Задание

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

for I:=1 to 5 do

begin

A[I]:= I * (I - 2);

end;

Сколько элементов массива будут иметь значения больше 3?