Информатика, опубликовано 2018-08-22 23:23:46 by Гость

Вводится одномерный массив из 10 чисел . определите количество положительных чисел в данном массиве, стоящих на нечетных местах

Ответ оставил Гость

// 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

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.