ПОМОГИТЕ ПРОШУ! Даны два целых числа. Написать программу, которая выводит эти числа в...

Question

ПОМОГИТЕ ПРОШУ! Даны два целых числа. Написать программу, которая выводит эти числа в порядке убывания. Для решения используйте составной оператор IF <условие> then begin <операторы> end; Пример работы программы: Ввод: А=5, В=13 Вывод: 13, 5

Answer 1

Ответ:

var A,B: integer;

begin

readln(A,B);

if (A>B) then begin

write(A,' ');

write(B);

end;

if (B>=A) then begin

write(B,' ');

write(A);

end;

end.