Question

Через программу Кумир
1) ввести два числа и вывести их в порядке возрастания.
Введите два числа:
15 9
Ответ: 9 15
2) Ввести пять чисел и найти наибольшее из них.
Введите пять чисел:
4 15 9 56 4
Наибольшее число 56

Answer 1

var a,b,c,y,x,min,max:integer;

begin

writeln('Введите первое число');

readln(a);

writeln('Введите второе число');

readln(b);

writeln('Введите третье число');

readln(c);

writeln('Введите четвертое число');

readln(x);

writeln('Введите пятое число');

readln(y);

if a > b then max :=a else max :=b;

if max < c then max:=c;

if max < y then max:=y;

if max < x then max:=x;

writeln('Максимальное число = ',max);

end.