Напишите программу в pascal abc которая будет считать нули в числе

// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
  Writeln(ReadlnString('n=').Count(x->x='0'),' нулей');
end.

Тестовое решение:
n= 5350004533300045645600
8 нулей