Question

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

Answer 1

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

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