Заполнить массив из семи элементов случайными числами в интервале[ -10,10]и найти количествонулевых элементов массива , и если их нет , то вывести на экран (нулевых элементов нет ) .Пожалуйста посчитайте пожалуйста решить .

begin
  var a:=ArrRandom(7,-10,10); a.Println;
  var k:=a.Where(t->t=0).Count;
  if k>0 then Writeln('Кол-во нулевых элементов равно ',k)
  else Writeln('Нулевых элементов нет')
end.


-7 9 -4 -3 0 -4 7
Кол-во нулевых элементов равно 1

-3 -8 -8 9 10 2 10
Нулевых элементов нет