Информатика, опубликовано 2018-08-22 21:30:03 by Гость
Дан одномерный массив целых чисел найти сумму нечетных элементов
Ответ оставил Гость
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
var a:=ArrRandom(ReadInteger(n=),-99,99); a.Println;
Writeln(Sнеч=,a.Where((x,i)->i.IsEven).Sum)
end.
Тестовое решение
n= 15
59 16 -75 -21 -18 -21 -1 85 10 0 18 52 91 83 22
Sнеч=106
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на