дан массив. найти произведение элементов массива, уменьшенных вдвое

double array[]={4,2,5,8};
double answer=1;
for(int i=0;i<sizeof(array)/8;i++)
answer*=array[i]/2;
cout<<answer<<endl;

ввод реализуйте как угодно

Если я правильно понял условие:

var a:array[1..10]of integer;

i,n:integer;

begin

for i:=1 to 10 do readln(a[i]);

n:=1;

for i:=1 to 10 do n:=n*a[i];

writeln(n/20);

end.