Вообще не разбираюсь в программировании. паскаль. посчитать, сколько раз в массиве из 10 элементов встречается число 5. ввод элементов массива с random из отрезка [0; 8].

Var  a:array [1..10] of integer;
  i, k:integer;
begin
For i:=1 to 10 do
begin
a[i]:=random(9);
Write(a[i],' ');
If a[i] = 5
then
k:=k+1;
end;
Writeln;
Writeln(k);
end.