Какую задачу решает фрагмент?

Какую задачу решает фрагмент? <br>
FOR I:= 1 TO 5 DO BEGIN <br>
r[i]:=random(9); s:=s+r[i]; <br>
end;<br>
-нахождение количества элементов массива R(9);
-нахождение суммы элементов массива R(5);
-нахождение суммы элементов массива R(9);
-нахождение произведения элементов массива К(5);
-нахождение элементов массива К(5);


Какую задачу решает фрагмент? <br>
FOR I:= 1 TO 5 DO <br>
IF R[I] MOD 4=0 THEN S:=S*R[I]; <br>
-нахождение произведения элементов массива
-здесь ошибка, произведение будет равно 0, т. к. не задано первоначальное значение S
-нахождение произведения четных элементов массива
-нахождение произведения элементов массива, кратных 4
-нахождение суммы элементов массива


Какую задачу решает фрагмент? <br>
s:=1;
FOR I:= 1 TO 5 DO <br>
IF R[I] MOD 4=0 THEN S:=S*R[I]; <br>
-нахождение произведения элементов массива
-здесь ошибка, произведение будет равно 0, т. к. не задано первоначальное значение S
-нахождение произведения четных элементов массива
-нахождение произведения элементов массива, кратных 4

0