delphi初级..
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];
我想知道下,这两句具体什么意思,有知道的解答下谢谢
[解决办法]
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];
必要的空格和分行,是良好的书写习惯,也便于阅读。