作业帮 > 综合 > 作业

数据结构题 .2.试写一算法,自大至小依次输出顺序读入的三个整数 X、Y和Z的值.

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/20 05:11:15
数据结构题 .2.
试写一算法,自大至小依次输出顺序读入的三个整数 X、Y和Z的值.
var
a,b,c,i:longint;
d:array[1..100000] of 0..1;
begin
fillchar(d,sizeof(d),0);
readln(a,b,c);
d[a]:=1;
d[b]:=1;
d[c]:=1;
for i:=100000 downto 1 do
if d[i]=1
then write(i,' ');
end.
PS:你还想怎么样