Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от -10 000 до 10 000 включительно. Опишите на естественном языке или на одном из языков программирования алгоритм, позволяющий найти и вывести количество пар элементов массива, в которых хотя бы одно число не делится на 7. В данной задаче под парой подразумевается два подряд идущих элемента массива. Например, для массива из пяти элементов: 13; 7; 26; -1; 9 — ответ: 2.

Исходные данные объявлены так, как показано ниже на примерах для некоторых языков программирования и естественного языка. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать некоторые из описанных переменных.

Бейсик

CONST N AS INTEGER = 30 
DIM A (1 TO N) AS INTEGER 
DIM I AS INTEGER,
	J AS INTEGER,
	К AS INTEGER

FOR I = 1 TO N 
	INPUT A(I)
NEXT I
...
END

Python

# допускается также
# использовать две
# целочисленные переменные j и к 
а = [ ]
n = 30
for i in range(0, n): 
	a.append(int(input()))
...

Алгоритмический язык

алг
нач
	цел N = 30 
	целтаб а[1:N] 
	цел i, j, k 
	нц для i от 1 до N 
		ввод а[i] 
	кц
	...
кон

Паскаль

const 
	N = 30; 
var
	a: array [1..N] of integer; i, j, k: integer; 
begin
	for i := 1 to N do 
		readln(a[i]);
	...
end.

Си

#include <stdio.h>
#define N 30 
int main() { 
	int a[N]; 
	int i, j, k; 
	for (i =0; i < N; i++) 
		scanf("%d", &a[i]);
	...
	return 0;
}

Естественный язык

Объявляем массив А из 30 элементов.
Объявляем целочисленные переменные I, J, К.
В цикле от 1 до 30 вводим элементы массива А с 1-го по 30-й.
...

В качестве ответа Вам необходимо привести фрагмент программы (или описание алгоритма на естественном языке), который должен находиться на месте многоточия. Вы можете записать решение также на другом языке программирования (укажите название и используемую версию языка программирования, например Free Pascal 2.6) или в виде блок-схемы. В этом случае Вы должны использовать те же самые исходные данные и переменные, какие были предложены в условии (например, в образце, записанном на естественном языке).