Нужно ввести пять целых чисел и найти максимальное из них. в паскале, используя оператор "if then else". как поняла, необходимо расписать все , уже видела здесь решение через n, это не подходит. буду тому, кто решит

127

395

Посмотреть ответы 2

Ответы на вопрос:

anx2003

Информатика

4,7(40 оценок)

Program abc var a,b,c,d,e,max: real; begin writeln ('введите пять целых которые нужно сровнять между собой'); readln (a,b,c,d,e); if a> b then max: =a else max: =b; if c> max then max: =c; if d> max then max: =d; if e> max then max: =e; writeln ('наибольшее число ',max); end.