Решите в программе Паскаль эту задачу.

Вводятся три целых числа. Найти из них максимальное значение.

Question

Серапион

4 марта, 07:17

+5

Ответы (1)

Знаете ответ?

Авдокея · 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.

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