Дан массив c[n] заполненный по формуле, определить произведение его нечентых элементов и вывести ее на экран y=sin(2x)+3
Написать на языке паскаль
Нечётным должен быть индекс элемента в массиве или значение самого элемента?
program raf105;
const
n = 10;
var
c:array[1..n] of real;
i:integer;
x,pro:real;
begin
write('x = ');
readln(x);
pro:=1;
for i:=1 to n do
c[i]:= sin(2*x)+3;
if (i mod 2)<>0
then pro*= c[i];
end;
writeln('Произведение нечётных элементов: ',pro);
end.
помогите очень срочно https://znanija.com/task/32385568