Question

Найти сумму значений элементов массива D(8),стоящих на нечетных местах.Значения элементов массива вводятся с клавиатуры.

Answer 1

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var d:=ReadArrReal(8);
  Writeln('Искомая сумма ',Range(0,7,2).Select(i->d[i]).Sum)
end.

Пример
3.5 -2.8 4 4.1 0 6 -8.15 11
Искомая сумма -0.65