Помогите! Ввести три числа и найти наибольшее из них. Пример: Введите три числа: 4 15 9...

Question

Помогите!
Ввести три числа и найти наибольшее из них.
Пример:
Введите три числа:
4 15 9
Наибольшее число 15

Answer 1

Program Henry;
var
a,b,c,max:real;
begin
writeln('Здравствуйте, введите 3 числа: ');
readln(a,b,c);
if (a>b) and (a>c) then
 max:=a
else
 if b   max:=c
 else
  max:=b;
writeln('Наибольшее число:  ',max);
end.

Comments

Вы знаете, что этот ответ неправильный.