
试写一算法,自大到小依次输出顺序读入的三个数X,Y和Z的值
1个回答
展开全部
readln(a[1],a[2],a[3]);读入
for i:=1 to 2 do
for j:=i+1 to 3 do
if a[i]<a[j] then begin y:=a[i];a[i]:=a[j];a[j]:=y;end;
for i:=1 to 3 do writeln(a[i]);
for i:=1 to 2 do
for j:=i+1 to 3 do
if a[i]<a[j] then begin y:=a[i];a[i]:=a[j];a[j]:=y;end;
for i:=1 to 3 do writeln(a[i]);
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询