Задание

Значение массива A размеров 5 задаются с помощью цикла в данном фрагменте программы:
for I:=1 to 5 do
begin
if \(\(I mod 3\) = 1) or \(\(I mod 2\) = 0) then A

\[I\]
:= I * \(5 \- I\)
else A
\[I\]
:= I * \(4 \- I\)
end;
Сколько элементов массива будут иметь отрицательные значения?