Дано 2 числа, ввести на экран большее из них

Question

Информатика

Моня

18 апреля, 18:28

Дано 2 числа, ввести на экран большее из них

+4

Ответы (1)

Знаете ответ?

Летта · Answer 1

Var

a, b:integer;

begin

write ('введите два числа') ;

readln (a, b) ;

if a>b then writeln (a) ;

if b>a then writeln (b) ;

if a=b then writeln ('эти числа равны') ;

end.