RUNMODE:0;
VARIABLE:ARR[]=13，ARR1[]=0;
ARR[1]:=10;
ARR[2]:=9;
ARR[3]:=8;
ARR[4]:=9;
ARR[5]:=10;
ARR[6]:=11;
ARR[7]:=10;
ARR[8]:=9;
ARR[9]:=10;
ARR[10]:=11;
ARR[11]:=12;
ARR[12]:=11;
ARR[13]:=15;
//如何用循环语句实现如下功能：
如果ARR[2]<=ARR[1],那么ARR1:=ARR[1]; //ARR1[1]:=10
如果ARR[3]<=ARR[1],那么ARR1:=ARR[1]; //ARR1[2]:=10
如果ARR[4]<=ARR[1],那么ARR1:=ARR[1]; //ARR1[3]:=10
如果ARR[5]<=ARR[1],那么ARR1:=ARR[1]; //ARR1[4]:=10
如果ARR[6]>ARR[1],那么ARR1:=ARR[6]; //ARR1[5]:=11
如果ARR[7]<=ARR[6],那么ARR1:=ARR[6]; //ARR1[6]:=11
如果ARR[8]<=ARR[6],那么ARR1:=ARR[6]; //ARR1[7]:=11
如果ARR[9]<=ARR[6],那么ARR1:=ARR[6]; //ARR1[8]:=11
如果ARR[10]<=ARR[6],那么ARR1:=ARR[6]; //ARR1[9]:=11
如果ARR[11]>ARR[6],那么ARR1:=ARR[11]; //ARR1[10]:=12
如果ARR[12]<=ARR[11],那么ARR1:=ARR[11]; //ARR1[11]:=12
如果ARR[13]>ARR[11],那么ARR1:=ARR[13]; //ARR1[12]:=15
谢谢各位老师！
你这个不就求最大值。直接LARGE函数取值
用for，也是一样的，
temp:=0;
for i=1 to 13 do begin
if ARR[i]>temp then BEGIN
temp:=ARR[i];
end
end
看4楼