Question

Это программа Pascal abc . напишите последовательность команд с помощью которой можно переставить значения переменных a и b чтобы выполнялось условие a<=b.

Answer 1

var a, b, c: integer;

begin

readln(a, b);

if a > b then

begin

c := b;

b := a;

a := c;

end;

writeln(a, ' ', b);

end.