ПАСКАЛЬ Дан одномерный массив A[10]. Элементы массива – это случайные числа большие 0. Написать программу, которая будет находить произведение элементов массива, лежащих в интервале [20, 70].
Ответ:
var i,s: integer;
begin
s:=1;
randomize();
for i:=1 to 10 do
A[i]:=random(100);
write(A[i],' ');
if (A[i]>=20) and (A[i]
s:=s*A[i];
end;
writeln();
writeln('Произведение элементов массива: ',s);
end.
Можешь ещё помочь пожалуйста
https://znanija.com/task/35215089
https://znanija.com/task/35215122
https://znanija.com/task/35215759