Дан целочисленный массив из 40 элементов. Элементы массива могут
Условие
| Дан целочисленный массив из 40 элементов. Элементы массива могут принимать целые значения от -100 до 100 включительно. Опишите на естественном языке или на одном из языков программирования алгоритм, позволяющий найти и вывести количество пар элементов массива, сумма которых чётна, а произведение больше 100. Под парой подразумевается два подряд идущих элемента массива. Исходные данные объявлены так, как показано ниже на примерах для некоторых языков программирования и естественного языка. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать некоторые из описанных переменных. Бейсик | Паскаль |
|---|---|
| N = 40 DIM A(N) AS LONG DIM I, J, K AS LONG FOR I = 1 TO N INPUT A(I) NEXT I... END | const N = 40;vara: array [1..N] of longint;i, j, k: longint;begin for i := 1 to N doreadln(a[i]);...end. |
| Си++ | Естественный язык |
| #include <iostream>using namespace std;#define N 40int main(){ long a[N]; long i, j, k; for (i=0; i<N; i++) cin >> a[i]; ...} | Объявляем массив A из 40 элементов. Объявляем целочисленные переменные I, J, K. В цикле от 1 до 40 вводим элементы массива A с 1-го по 40-й.... |
| Алгоритмический язык | Python |
| алгнач цел N = 40 цел таб a[1:N] цел i, j, k нц для i от 1 до N ввод a[i] кц ...кон | N = 40i = Nonej = Nonek = Nonea =[int(input()) for i in range(N)]... |
В качестве ответа Вам необходимо привести фрагмент программы (или описание алгоритма на естественном языке), который должен находиться на месте многоточия. Вы можете записать решение также на другом языке программирования (укажите название и используемую версию языка программирования, например Free Pascal 2.
- или в виде блок-схемы. В этом случае Вы должны использовать те же самые исходные данные и переменные, какие были предложены в условии (например, в образце, записанном на естественном языке).
Формат задания
Развёрнутый ответ: короткого ответа здесь нет — оценивается само рассуждение. Разбор откроется после входа.
Решение по шагам
Как рассуждать
Решение. На языке Паскаль | k := 0;for i := 1 to N - 1 do if ((a[i] + a[i + 1] ) mod 2 =
Осталось ещё 7 шагов
and (a[i] * a[i + 1] >…
then inc(k);writeln(k); | На алгоритмическом…
= 0 и a[i] * a[i + 1] > 100 то k := k +…
> 100 THEN K = K + 1 END IF NEXT I PRINT K |…
k++;cout << k; | На языке Python | k = 0for i…
В цикле от первого элемента до предпоследнего…
Если значение данного остатка равно 0 и…
Бесплатно · займёт минуту
Другие задачи по теме «Алгоритмы обработки массивов»
Предложена правильная программа, которая изменяет исходный массив в11 классПредложена правильная программа, которая изменяет исходный массив в11 классПредложена правильная программа, которая изменяет исходный массив в11 классПредложен правильный алгоритм, выдающий верное значение.Допускается11 классПредложен правильный алгоритм, выдающий верное значение. Допускается11 класс