, буду очень благодарна!
5. Повтори 3 [Вперёд 50 Направо 100 Направо 20]
243
398
Ответы на вопрос:
Var i,n: integer; a: array [1..1000] of integer; begin read(n); for i: =1 to n do read(a[i]); //вводим элементы массива for i: =1 to n do begin if a[i] mod 2 = 0 then inc(a[i]); //прибавляем 1 к четным элементам write(a[i], ' '); end; end.
Популярно: Информатика
-
olgaocher15.03.2023 01:59
-
Kurlyk11114.06.2020 18:51
-
Maykaktys14.06.2021 20:03
-
Nina121106522.08.2020 03:44
-
Egor19060609.07.2022 05:07
-
73Женя9109.06.2021 10:46
-
shebkoch28.06.2022 18:42
-
lugmar325.06.2022 16:40
-
отличник73729.01.2023 04:41
-
pineapplenastya103.07.2022 22:14