Question

Только не берите с интернета, пожалуйста!
Новую программу!
Составить программу в Паскале для обработки одномерного массива из 10 чисел Х=(-17,3; 13,2; -7; -2,36; 123,4;-0,3; 12,356; 142;0; -1). Вычислить количество элементов массива с нечетными номерами на отрезке [5,1..32,4]. В отчет включить программный код и результат работы программы в виде скриншота. Программная реализация обязательна.

Answer 1

// PascalABC.NET

begin

 var x: array of real :=

     (-17.3, 13.2, -7, -2.36, 123.4, -0.3, 12.356, 142, 0, -1);

 x.Indices((v, i) -> i.IsEven and (v.InRange(5.1, 32.4))).Count.Print

end.