Регистрация
Максоон20022
05.06.2023 05:43
Информатика
Есть ответ 👍

Завтра уже ! 12 закодируйте короткую фразу на языке. укажите таблицу и метод кодировки

128
498
Посмотреть ответы 1

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

opuros33
opuros33
4,6(15 оценок)
Var mas: array [1..3] of integer; i: integer; begin writeln('введите 3 числа'); for i: = 1 to 3 do readln(mas[i]); for i: = 1 to 3 do if mas[i]> 0 then writeln('положительное число ', mas[i] ,' было возведено в квадрат =', sqr(mas[i])) end.

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