如何使用pascal將數組寫入.dat

Question

我需要執行一項任務，在其中製作兩個程序，一個寫一個團隊中的玩家列表和他們的分數，另一個讀取並搜索.dat特定玩家的檔案。

我選擇使用數組來做到這一點，但是當我輸入我的第一個球員得分後，我運行我的第一個程序時，我得到了一個exitcode 201。

我的代碼：

Program TeamWrite; 
    Var FName : String; 
     UserFile : Text; 
     Players : array[1..10] of string; 
     Score : array[1..10] of integer; 
     List1: Integer; 
     List2: Integer; 

BEGIN 
    FName := 'Team'; 
    Assign(UserFile, 'C:\Team.dat'); 
    Rewrite(UserFile); 
    FOR List1:= 1 to 10 DO 
      begin 
       Writeln('Enter players name and score separated by pressing enter.'); 
       Readln(Players[List1]); 
       Readln(Score[List2]); 
       Writeln(UserFile, Players[List1]); 
       Writeln(UserFile, Score[List2]); 
      end; 
    close(UserFile); 
End. 

請幫幫忙！

Answer 1

您的變量List2未初始化，因此Score[List2]會生成「索引超出界限」錯誤。其實你根本不需要List2;只是使用List1而不是你的程序應該工作。