Информатика - Введены два числа нужно определить больше из них либо написать что числа равны

Question

Информатика

Раиса

20 февраля, 07:00

Информатика - Введены два числа нужно определить больше из них либо написать что числа равны

+1

Ответы (1)

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

Герасим · Answer 1

Решение:

var

a, b:integer;

begin

write ('Введите два числа: ') ; readln (a, b) ;

if a>b then writeln ('Первое число больше, чем второе')

else if a
else writeln ('Числа равны') ;

end.

Проверил на Паскале, работает 100%