
Феодул
5 год назад
Дан массив из 10 вещественных чисел.Посчитать сумму элементов массива с черными номерами
ОТВЕТЫ

Trofim
Oct 24, 2020
begin
var a:=ReadArrReal('Введите 10 чисел:',10);
Writeln('Искомая сумма равна ',a.Where((x,i)->i.IsOdd).Sum)
end.
Введите 10 чисел: 3.6 -1.45 2.11 6 3.9 -12.65 4.1 -5 0 11.3
Искомая сумма равна -1.8
912
Смежные вопросы: