Регистрация
natslig
21.11.2021 00:58
Информатика
Есть ответ 👍

Вычислить y=100/x, если x< 0; y=100*x, если x> =0, с программы паскаль

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

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

Fast2791
Fast2791
4,4(41 оценок)
Var x,y: integer; begin writeln('введите число'); readln(x); if x< 0 then y: =100/x else y: =100*x; writeln('полученное число =', y); end.
Артём1228777
Артём1228777
4,4(51 оценок)
Var       i: integer; begin       for i : = 1 to 4 do               writeln(random(10)); end.

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