Даны два целых числа от -40000 до 40000. Вывести их в порядке возрастания.
Даны два целых числа от -40000 до 40000. Вывести их в порядке возрастания.
Гость
Ответ(ы) на вопрос:
ГостьVar a,b:integer;
Begin
randomize;
a:=random(80001)-40000;
b:=random(80001)-40000;
if a>b then writeln(b,', ',a)
else writeln(a,', ',b);
End.
Не нашли ответ?
Похожие вопросы