дан массив из N целочисленных элементов. найти максимальное количество подряд идущих нулевых элементов. Гарантируется, что в массиве есть хотябы одна пара рядом стоящих нулевых элементов

Спасибо, спасли просто ))))

Да, особенно смешно, что ты отметила лучшим какой-то глупый ответ.

Как делиться баллами? Не нашла ((9

Читай внизу станицы по ссылкам

не нашла, как делиться ((

PascalABC.NET 3.4begin  var n := ReadInteger('n=');  var a := ArrRandom(n, 0, 2); a.Println;  var (k, km) := (0, 0);  for var i := 0 to n-1 do    if a[i] = 0 then      if k = 0 then k := 1      else k += 1    else      begin      if k > km then km := k;      k := 0      end;  Writeln('Максимальное количество нулей подряд равно ',km)  end.