Дано А, B, C. Сравнит и найти наибольшую. Составить программу

Question

Информатика

Петера

14 июня, 08:12

Дано А, B, C. Сравнит и найти наибольшую. Составить программу

+2

Ответы (1)

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

Риган · Answer 1

Var a, b, c, max: Integer;

begin

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

readln (a, b, c) ;

max:=a;

if max
if max
writeln ('Наибольшее число: ', max) ;

end.