fork download
copy 
  1. program xyz;
  2. var
  3.   x, y, z, t: integer;
  4. begin
  5. 	read(x, y, z);
  6. 	if x > y then begin t := x; x := y; y := t; end;
  7. 	if x > z then begin t := x; x := z; z := t; end;
  8. 	if y > z then begin t := y; y := z; z := t; end;
  9. 	write(x, ' ', y, ' ', z);
  10. end.
Success #stdin #stdout 0s 5284KB
comments (?)
stdin
copy 
5 4 3
stdout
copy 
3 4 5
https://ideone.com/XOl5LE
xyz
language:
Pascal (fpc 3.0.4)
created:
2 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!