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

Напримерvar a,b,c,m: integer;beginread(a,b,c);m := a;if b > m then m := b;if c > m then m := c;write(m)end.