Ввести с клавиатуры 2 числа a и b. Если a = b; вывести на экран "a = b". Если a > b; вывести на экран "a > b". Если a < b; вывести на экран "a < b".

Question

Информатика

Юраня

17 мая, 02:10

Ввести с клавиатуры 2 числа a и b. Если a = b; вывести на экран "a = b". Если a > b; вывести на экран "a > b". Если a < b; вывести на экран "a < b".

+3

Ответы (1)

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

Архип · Answer 1

Var

a, b:integer;

begin

writeln ('Введите a') ;

readln (a) ;

writeln ('Введите b') ;

readln (b) ;

if a>b then

writeln ('a>b')

else

if a
writeln ('a
else

writeln ('a=b') ;

end.