Даны два целых числа от - 40000 до 40000. Вывести их в порядке возрастания.

Question

Информатика

Катюра

2 марта, 23:00

Даны два целых числа от - 40000 до 40000. Вывести их в порядке возрастания.

+2

Ответы (1)

Знаете ответ на вопрос?

Каллиникия · Answer 1

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.