Составить программу ввести три целых числа и найти наибольшее из них. Пример: введите три...

Question

Составить программу
ввести три целых числа и найти наибольшее из них.
Пример: введите три числа
4 15 9
наибольшее число 15

Answer 1

Program skynet;
var a,b,c,max:integer;
begin
writeln('Введите 3 целых числа');
readln(a,b,c);
if a>b then max:=a
else
if b>c then max:=b
else max:=c;
writeln('Наибольшее число = ',max);
end.