Даны 2 числа. найти наибольшее из них. (разработка программ на языке Паскаль, с использованием оператора ветвления и логических операций)

Question

Информатика

Абросим

10 декабря, 22:05

Даны 2 числа. найти наибольшее из них. (разработка программ на языке Паскаль, с использованием оператора ветвления и логических операций)

+1

Ответы (1)

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

Тема · Answer 1

Var a, b:integer;

begin

readln (a, b) ;

if a>b then writeln (a,' больше ', b) else if a=b then writeln ('Числа равны') else writeln (b,' больше ', a) ;

end.