Ответы на вопрос:
Const n = 10; var m : array[1..n] of integer; i : integer; begin randomize; for i: =1 to n do begin m[i]: =random(50); write(m[i]: 3); end; writeln; for i: =1 to n do begin if not odd(m[i]) then m[i]: =m[i]*2; write(m[i]: 3); end; writeln; end.
Популярно: Информатика
-
Jefry22802.06.2020 17:40
-
ждл120.02.2020 22:01
-
DJZargo12.05.2021 23:13
-
Зайчутка23.07.2021 11:02
-
janneellz31.08.2022 12:47
-
kategys02.11.2021 03:19
-
nparshina1404.05.2023 21:22
-
little22elf17.06.2020 15:50
-
Миша200644321.06.2020 06:46
-
prostoliii08.04.2021 07:22