Регистрация
lebedevamilp00sr9
16.02.2022 21:12
Информатика
Есть ответ 👍

с этой формулой паскаль. Как её записать

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

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

Кети20060106
Кети20060106
4,5(44 оценок)

Объяснение:

.....................


с этой формулой паскаль. Как её записать
karma228cska
karma228cska
4,7(86 оценок)
Var a, b, c, x, x1: real; begin       readln(a, b, c);       if (a < 0) then x : = x + 1 else x1 : = x1 + 1;       if (b < 0) then x : = x + 1 else x1 : = x1 + 1;       if (c < 0) then x : = x + 1 else x1 : = x1 + 1;       writeln(x1, '; ', x);             if (x1 < x) then         writeln(a*b*c)       else       begin           x : = a;           if (b > x) then x : = b;           if (c > x) then x : = c;           writeln(x);       end; end.

Популярно: Информатика