Что делать ? ноутбука клавиша сломалось. дайте по подробнее инструкцию
150
410
Ответы на вопрос:
Var n,i,s: integer; a: array[1..100] of integer; begin read(n); for i: =1 to n do begin read(a[i]); if ((i mod 2)=1) and ((a[i] mod 2)=0) then s: =s+1; end; writeln(s); end.
Популярно: Информатика
-
ArLesya29.02.2020 01:12
-
Аленушка5454545411.01.2021 21:49
-
Белочка010727.11.2022 10:00
-
LogiutNowakk09.01.2022 03:17
-
саша851021.05.2022 04:16
-
Shbtura0113.10.2022 21:05
-
Alexandra090329.09.2020 02:29
-
sxmax23.09.2021 02:26
-
valeri091020027.04.2022 19:06
-
Хаурма709.05.2023 06:50