Помогите, пожалуйста.
Программа Паскаль.
Найдите количество элементов кратных 5 в массиве из N чисел. N <= 5.

const nmax = 5;var a:array [1..nmax] of integer;      i,k:integer;begin  k:=0;  randomize;  for i:=1 to nmax do    begin      a[i]:=random(11)+10;      write (a[i],' ');      if a[i] mod 5 = 0 then inc(k);    end;  writeln;  writeln ('Kol-vo: ',k);end.