Question

Задача по информатике
Составьте программу
1 ввести три числа найти наибольшее из них
Пример
Введите три числа
4 15 9
Наибольшее 15
Плез сделайте в кумире

Answer 1

var  a, b, c: integer;

begin

 writeln('Введите три числа:');

 readln(a, b, c);

 if (a > b) and (a > c) then writeln(a);

 if (b > a) and (b > c) then writeln(b)

 else writeln(c)

end.

Вот