Ответы на вопрос:
Const n = 10; var a: array[1..n] of integer; i: integer; begin write('исходный массив: '); for i: = 1 to n do begin a[i]: =random(21)-10; write(a[i],' '); end; writeln; write('переработанный массив: '); for i: = 1 to n do begin if a[i] > 0 then a[i]: =-a[i]; if a[i] = 0 then a[i]: =100; write(a[i],' '); end; end. пример: исходный массив: -7 10 -1 -8 9 -5 -1 -5 -9 0 переработанный массив: -7 -10 -1 -8 -9 -5 -1 -5 -9 100
Популярно: Информатика
-
Рэнджер18.01.2020 03:37
-
кирилл2289529.07.2020 07:48
-
соннышко22.09.2020 16:54
-
polulera200504.08.2020 18:11
-
zizi202027.01.2022 07:21
-
aresu13.05.2023 19:33
-
maksim345203.05.2021 18:05
-
маридиана03.06.2023 13:44
-
phyf24.12.2022 21:48
-
KerimovaLuiza91925.07.2022 04:53