Вводится последовательность из n произвольных целых чисел. найти количество введенных нулей.

// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('N=',ReadSeqInteger(ReadInteger('n=')).Where(k->k=0).Count)
end.

Пример
n= 7
1 0 0 4 -3 0 3
N=3