Question

我不知道阵列范围是如何限制我的，例如这个程序

program Test;
  var
    a:integer;
    c:array[1..5] of integer;
  begin
    for a:=0 to 8 do begin
      read(c[a]);
    end;
    for a:=0 to 8 do begin
      writeln(c[a]);
    end;
end.

输入1 2 3 4 5 6 7 8 9写1 2 3 4 5 6 7 8 9（由于writeln全部在新行中）但是数组范围应该是1到5，它如何接受更多的值然后？我也试过Setlength（c，5），但同样的故事

Answer 1

  for a:=low(c) to high(c) do
   <code>

较新的德尔福也可能允许长度，定义为高（c）-low（c）+1

Pascal中的数组长度

1 个答案: