Значение массива A размеров 5 задаются с помощью цикла в данном фрагменте программы:
for I:=1 to 5 do
begin
A

:= I * \(6 \- I\);
end;
Сколько элементов массива будут кратны 3?