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

Question

Информатика

Алинка

20 октября, 18:03

Даны 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.