Помогите пожалуйста решить задачу на PASCAL

программирование pascal

Составить подпрограмму,которая в массиве подсчитывает max количество стоящих подряд нулей.С её помощью в основной программе рассчитать эти значения для двух произвольных массивов.
Ответы:

Ссылки

[1]
Без названия
(Web)
очень просто,
допустим, a - массив из n элементов, b - временный счетчик, c - максимальное значение, i - счетчик цикла
b:=0;
for i:=1 to n do
begin
if a[i] = 0 then b=b+1;
if (a[i+1] <> 0) and (b>c) then begin c:=b; b:=0; end;
end


13 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.