ИнформатикаДан массив целых чисел.Найти количество нулей

begin
  var a:=ArrRandom(ReadInteger('n='),-9,9); a.Println;
  Writeln('Количество нулей равно ',a.Where(x->x=0).Count)
end.


n= 25
0 1 5 3 -8 8 3 -9 6 9 2 -1 -6 -8 -1 0 -1 7 5 4 8 -1 4 9 1
Количество нулей равно 2