Условие задачи
Составьте программу на языке программирования Паскаль для обработки массива из 12 вещественных чисел. Входные данные для значений элементов массива задайте самостоятельно. Вычислите количество элементов массива с нечётными номерами на промежутке [5,1; 32,4].
Ответ
Код программы:
var arr: array [1..12] of real;
i, cnt: integer;
begin
// ввод массива
writeln('Введите массив:');
for i := 1 to 12 do read(arr[i]);
// обработка массива
cnt := 0;
for i := 1 to 12 ...
Потяни
