delphi初级..

Question

var
 max,i:integer;
 Arr:array[0..6] of integer=(8,5,-4,3,9,1,4);begin
  Max:=arr[0]
  for i:=1 to 6 do
   if Arr[i]>Max then Max:=Arr[i];
  writeln('这些数中最大值是: ',max);
  readln; Arr:array[0..6] 
  if Arr[i]>Max then Max:=Arr[i];
我想知道下,这两句具体什么意思,有知道的解答下谢谢

Answer 1

Arr:array[0..6]  定义有7个元素的数组，下标为0..6
if Arr[i]>Max then Max:=Arr[i];  Max赋值为Arr中最大值

Answer 2

if Arr[i]>Max then Max:=Arr[i];---将max和Arr[i]中较大的付给max
下面
 for i:=1 to 6 do
   if Arr[i]>Max then Max:=Arr[i];-----是通过循环取出数组中的最大值,上面例子中应该为9

Answer 3

Arr:array[0..6] of integer
定义整型数祖，7个单元，下标从0到6，PASCAL可以定义下标上下界的。if Arr[i]>Max then Max:=Arr[i];
这个是比较Arr[i] 和 Max 的大小，如果 Arr[i]>Max，让Max =Arr[i]，也就是说将Arr[i] 与Max 中最大的那个数值放如 MAX 中。  for i:=1 to 6 do
   if Arr[i]>Max then Max:=Arr[i];
的用意，就是通过循环，将数组中最大的数值放如 MAX中。======================
一般来说，应该如下书写：
  Max := arr[Low(Arr)];          // 你这里少写了分号
  for i := Low(arr) + 1 to High(Arr) do  // 通过 Low、High函数，可以避免因为修改数组定义带来的超界风险。
    if Arr[i] > Max then
      Max := Arr[i];
必要的空格和分行，是良好的书写习惯，也便于阅读。