• Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от 0 до 10 включительно – показатели среднего отклонения от нормальной работы прибора за день, зафиксированные в течение месяца. Написать на языке Паскаль алгоритм подсчета максимального количества подряд идущих дней, в которые прибор работал исправно (отклонение от нормальной работы прибора за день было равно 0), при условии, что хотя бы один день прибор работал исправно. Исходные данные объявлены так, как показано ниже. Запрещается использовать необъявленные переменные, но разрешается не использовать часть из них.

    const n = 30;
    var a : array [1 .. n] of integer;
    I, k1, k2 : integer;

    begin for i := 1 to n do readln ( a [ i ] );

    end.

Ответы 0

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years