Question

Решите в программе Паскаль эту задачу.
Вводятся три целых числа. Найти из них максимальное значение.

Answer 1

Например

var a,b,c,m: integer;
begin
read(a,b,c);
m := a;
if b > m then m := b;
if c > m then m := c;
write(m)
end.