Дан целочисленный массив из 20 элементов. Элементы массива могут принимать целые значения от –10 000 до 10 000 включительно. Опишите на естественном языке или на одном из языков программирования алгоритм, позволяющий найти и вывести количество пар элементов массива, в которых хотя бы одно число делится на 3. В данной задаче под парой подразумевается два подряд идущих элемента массива. Например, для массива из пяти элементов: 6; 2; 9; –3; 6 – ответ: 4. ответ должен содержать последовательнрсть пропущеных элементов кода в соотве. с их номерами

Колонтитул — справочная строка над текстом страницы (иногда сбоку от него и редко под ним), определяющая содержание страницы: какое произведение какого автора на ней напечатано в сборнике; какой параграф какой главы — в моноиздании; какая статья или какие статьи — в словаре; о каком событии, предмете, лице ведется речь — в мемуарах. : колонтитул, отражающий содержание текста страницы, позволяет читателю быстро находить фрагмент на конкретную частную тему, не просматривая текст и не вчитываясь в него. к сожалению, колонтитулы применяются не часто. объясняется это тем, что при верхнем колонтитуле уменьшается площадь полосы под текст по крайней мере на две строки. это часто и останавливает издателя. чтобы избежать потерь площади, можно использовать нижний колонтитул. он входит в строку с колонцифрой (номером страницы), а она ставится за пределами полосы, которая при этом не уменьшается. можно помещать колонтитул только на одной стороне разворота, что уменьшит потери вдвое. есть и другие способы уменьшить потери площади, каждый издатель сам должен подумать какой из них выбрать. нецелесообразно использовать в книге постоянный (мертвый) колонтитул, так как он не несет никакой функциональной нагрузки: каждый помнит, какую книгу он читает и кому она принадлежит. потеря бумаги из-за постоянных колонтитулов ничем не оправдана. кроме постоянных (бесполезных) колонтитулов существуют переменные, которые различаются: — по объекту на странице, который служит основой для формулирования колонтитула: 1) рубрикаиионный — в основе лежит заголовок подраздела, текст которого расположен на странице; 2) текстовой — в основе лежит содержание текста страницы, когда он не расчленен заголовками или расчленен заголовками нумерационными, немыми, графическими, т. е. не определяющими тему подразделов; — по принципу смены одного колонтитула другим: 1) прерывистый — меняется только с началом нового подраздела; 2) скользящий — меняется с каждой новой страницей или даже колонкой. среди прерывистых рубрикационных различаются: 1) колонтитулы одноступенные, когда в колонтитул вынесены заголовки только одной ступени, т. е. одной значимости (только глав или только параграфов); 2) двух- и трехступенные — колонтитулы левой страницы разворота одной ступени, а правой — другой, подчиненной; например, слева заголовки глав, справа — параграфов и подпараграфов. виды колонтитулов по их внешним особенностям: по месту на развороте — левый (на левой полосе разворота) и правый (на правой стороне разворота); по месту на полосе — верхний (над текстом), боковой (на боковом наружном поле), нижний (в строке с нижней колонцифрой), оборонный (врезан в текст полосы сверху или снизу). выбор колонтитула зависит от особенностей произведения и книги и самого колонтитула. от колонтитулов требуется, чтобы они: 1.кратко, но четко выражали содержание подраздела, к которому относится страница или содержание самой страницы. 2. менялись справа не чаще чем через 2—3 страницы и не реже, чем через 8—10 страниц. 3. включали в себя не только тематическую часть заголовков, но и родонумерационную, поскольку ссылки в книге чаще всего делаются только на род и номер рубрики.

ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём ИЗ "...\Отделы\Обмен\", Матем ИЗ "...\Отделы\Числа\";

ПЕР
  массив: РЯД 30 ИЗ ЦЕЛ;
  сч, число: ЦЕЛ;
  найдено: КЛЮЧ;

УКАЗ
  ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
    массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 65)) + 20;
    Вывод.ЧЦел("%d ", массив[сч], 0, 0, 0)
  КОН;
  Вывод.Цепь("^");
  число := Приём.Число();
  Вывод.Цепь("^");
  найдено := ОТКЛ;
  ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
    ЕСЛИ массив[сч] > число ТО
      Вывод.ЧЦел("%d ", массив[сч], 0, 0, 0);
      ЕСЛИ НЕ найдено ТО найдено := ВКЛ КОН
    КОН
  КОН;
  ЕСЛИ НЕ найдено ТО Вывод.Цепь("нет") КОН

КОН Задание.