Ответы на вопрос:
// pascalabc.net 3.1, сборка 1198 от 11.03.2016 begin var a: =readarrinteger(10); writeln('кол-во=',a[0: 9: 2].where(x-> x> 0).count) end. тестовое решение: 3 -5 4 -2 -3 0 4 -1 -8 2 кол-во=3
Популярно: Информатика
-
eliseygrid5308.05.2022 03:25
-
lipa290709.12.2020 08:48
-
yakubchik200403.12.2020 16:18
-
jadeholden45101.01.2020 15:06
-
innocen28.02.2022 03:33
-
VicusiaKoval04.03.2022 22:13
-
vik2005119.03.2020 00:35
-
alinkaaa2527.05.2020 05:30
-
rauf200719.01.2021 02:26
-
yeghiazaryanhap01lbi29.06.2023 07:20