Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 979 ответов!

Дан целочисленный массив из 20 элементов. Элементы массива могут принимать целые

10-11 класс

значения от 0 до 10000 включительно. Напишите

РозовыйАнгел 09 марта 2014 г., 10:36:12 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
трампампампа
09 марта 2014 г., 11:40:59 (10 лет назад)

const
  n = 20;

var
  i, k: integer;
  a: array[1..n] of longint;

begin
  Writeln('Введите с клавиатуры ', n, ' целых чисел через пробел');
  k := 0;
  Read(a[1]);
  for i := 2 to n do
  begin
    Read(a[i]);
    if ((a[i - 1] * a[i] mod 2) = 1) and ((a[i - 1] + a[i] mod 5) <> 0) then k := k + 1
  end;
  Writeln(#13#10, 'Найдено пар: ', k)
end.

Тестовое решение:

Введите с клавиатуры 20 целых чисел через пробел
10 24 18 35 35 16 52 163 265 210 318 45 18 35 62 10 84 90 425 300

Найдено пар; 2



+ 0 -
Aagadulin
09 марта 2014 г., 12:37:19 (10 лет назад)

Язык программирования?

+ 0 -
дарья196
09 марта 2014 г., 13:26:28 (10 лет назад)

Pascal

+ 0 -
RakhatBasyrov
09 марта 2014 г., 14:59:50 (10 лет назад)

Массив с клавиатуры заполнять или случайными числами от датчика?

+ 0 -
Kameliyamilaha
09 марта 2014 г., 16:10:45 (10 лет назад)

C клавиатуры

Ответить

Другие вопросы из категории

Задание. Составьте блок схему алгоритма решения задачи и программу на языке Turbo Pascal c использованием условного оператора.

Даны три целых числа.Найти кол-во положительных чисел в исходном наборе.

На каждой странице документа 96 строк, по 64 символа каждая. Сколько страниц в документе, если его информ. объём при условии, что каждый символ

кодировался 2-ух байтовой кодировкой, составил 720 Кбайт. Ответ запишите в виде целого числа.

Читайте также

ПАСКАЛЬ.1)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 1000.опишите на русском языке или на одном из

языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.

2) Дан целочисленный массив из 20 элементов, все элементы которого – целые числа в интервале от -1000 до 1000. Опишите на русском языке или на одном из

языков программирования алгоритм, который находит минимальное значение из всех нечетных элементов массива, которые делятся на 5.

дан целочисленный массив из 20 элементов. Элементы массива могут принимать целые числа от о до 10000 включительно. Опишите на естественном языке или на

одном из языков программирования алгоритм, позволяющий найти и вывести максимальное значение среди трехзначных элементов массива, оканчивающихся на 0

дан целочисленный массив из 20 элементов. Элементы массива могут принимать целые числа от о до 10000 включительно. Опишите на естественном языке или на

одном из языков программирования алгоритм, позволяющий найти и вывести максимальное значение среди трехзначных элементов массива, оканчивающихся на 0

дан массив из семи элементов написать программу подсчитывающую

среднее второго и предпоследнего элементов массива
дан целочисленный
массив из 10 элементов написать программу находящую сумму элементов
массива красных 3 ил 5
дан целочисленный массив из 30 ти элементов
написать программу которая позволяет найти среднее арифметическое
положительных элементов массива



Вы находитесь на странице вопроса "Дан целочисленный массив из 20 элементов. Элементы массива могут принимать целые", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.