В 8 будет 6. Программа подсчитывает количество песен, с количеством голосов больше 25 и выводит это число на экран.
А вот 9ое:
Program Array1;
const
n = 12;
var
a,b: integer;
d: array[1..n] of integer;
Begin
b:=1;
for a:=1 to n do
d[a]:= random(10,45);
for a:=1 to n do
if (d[a] mod 5)=0 then
b:=d[a]*b;
writeln('Произведение равно',' ',b);
end.