Оператор ПаскаляВведите 3 числа (а, б, с). Найти наибольшее из них

Задание:

Оператор ПаскаляВведите 3 числа (а, б, с). Найти наибольшее из них

Решение:

Var a,b,c: integer; Begin read (a , b, c); if b > a then a: =b; if c > a then a: =c; writeln (a); End.

Знаете другой ответ?

Отправить свой ответ