Ответы на вопрос:
Var a: array[1..100] of integer; n: integer; begin readln(n); for i: =1 to 2*n do if a[i] mod 2 =0 then writeln(a[i]); end.
Популярно: Информатика
-
Maxys36530.10.2022 07:25
-
Miller200512.04.2022 13:19
-
Игорь228526.02.2020 17:20
-
natalyacomandi17.04.2023 07:43
-
gopas1112317.03.2021 07:51
-
kkmla12307.12.2022 10:59
-
uhon1k12.03.2022 19:46
-
bedniyboyarin20.06.2020 14:49
-
Котики201701.12.2021 23:45
-
yulia378912.11.2020 12:07