Ответы на вопрос:
Var arr: array[1..10] of integer; i: integer; begin randomize; for i: =1 to 10 do begin arr[i] : = random(100); write(arr[i] + #9); end; writeln(); for i: =1 to 10 do begin if arr[i] mod 2 = 0 then begin arr[i] : = 1 end; write(arr[i] + #9); end; end.
Популярно: Информатика
-
YeezyM11.08.2022 08:27
-
sport2201.06.2022 21:30
-
marcella611200028.03.2022 17:54
-
KsunyaCernecova10.08.2020 22:06
-
nikitos19621.01.2022 08:26
-
Lemonchick25.10.2022 22:20
-
Aidos201127.02.2023 03:42
-
Kristino4kaMiy17.06.2023 04:58
-
lucaa18.09.2022 05:47
-
mustafina199004.10.2022 16:36