Ответы на вопрос:
Program z1; var a: array [1..30] of integer; i,k: integer; begin k: =0; for i: =1 to 30 do begin readln a[i]; if a[i] mod 2 =0 then k: =k+1; end; wreteln('четных',k); end.
План: 1.начать с легких 2.усложнять 3.делать каждый по твоему опыту 4.заниматся разными спорта 5.добиться до хорошей телесложения
Популярно: Информатика
-
slava4В17.09.2020 00:17
-
egorkamarkov016.11.2021 05:01
-
KseniaK025.03.2020 12:01
-
Catandgog05.06.2020 01:52
-
TamaraKengurs31.01.2022 16:21
-
tafefuyozo06.01.2020 02:37
-
vk2000128.01.2021 00:18
-
Mironovа01.03.2020 00:18
-
sbordog1337bogdan15.01.2023 17:32
-
maksCRAFTer30.09.2021 21:25