pascal中的错误代码201

Question

我正在pascal中创建一个程序，我要求我从文件中读取文件，然后按字母顺序排列名称。这是我到目前为止的代码。

for counter := 1 to 6 do
    begin 
        readln(infile, name[counter]);
            if names[counter] > names[counter+1] then
                high:=names[counter];
            if  names[counter] < names[counter-1] then
                low:=names[counter];
    end;

    for counter:= 1 to 6 do
        begin
            writeln(names[counter]);
        end;
close(infile);
readln()
end. 

Answer 1

这可能是范围检查错误。我想你有类似name,names:array[1..6] of string;的东西，你正在访问索引0 throgh 7. RTFM：http://www.freepascal.org/docs-html/user/userap4.html