Даны два целых числа. вывести их в порядке неубывания. пример 70 80 70 80

Var
a,b:Integer;
Begin
 Read(a,b);
 if (a>b) then Writeln(b,' ',a)
 else Writeln(a,' ',b);
end.