Question

Pascal 任意3个数比较它们的大小。要用到if语句的嵌套 ，谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢

Pascal 任意3个数比较它们的大小。要用到if语句的嵌套 ，谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢谢

Answer 1

var
a,b,c:longint;
begin
readln(a,b,c);
if a>=b then begin if a>=c then begin
write(a);
if b>=c then writeln(' ',b,' ',c)
else writeln(' ',c,' ',b);
end
else writeln(c,' ',a,' ',b) end
else begin if b>=c then begin
write(b);
if a>=c then writeln(' ',a,' ',c)
else writeln(' ',c,' ',a);
end
else writeln(c,' ',b,' ',a) end
end.

Answer 2

var a,b,c,t:longint;
begin
readln(a,b,c);
if a<b then begin t:=a; a:=b; b:=t; end;
if a<c then begin t:=a; a:=c; c:=t; end;
if b<c then begin t:=b; b:=c; c:=t; end;
writeln(a,' ',b,' ',c);
end;

Answer 3

begin
readln(a,b,c);
if a>b then if b>c then writeln(a,b,c) else writeln（a,c,b) else ......照例写下去