Составить программу Паскаль, которая получает наход 2 числа и выводит максимальное из них

Ответы

Ответ дал: 13nisa13
0

var a,b: integer;

begin

read(a,b);

if a > b then write (a)

else write (b)

end.

Или (если учитывать возможное равенство чисел)

var a,b: integer;

begin

read(a,b);

if a = b then write ('a = b')

else if a > b then write (a)

else write (b)

end.

Ответ дал: 13nisa13
0
Скорее первый вариант...
Ответ дал: MoonByul
0
Спасибо
Похожие вопросы