Задать вопрос
19 августа, 00:29

Массив заполнен целыми числами [-50:50] в массиве 10 чисел

1) найти сумму нечетных элементов

2) найти произведение элементов расположенных на четных местах,

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

+3
Ответы (1)
  1. 19 августа, 02:27
    0
    Var

    a: array [1 ... 10] of integer;

    pr, i, kol, sum: integer; begin

    sum : = 0;

    pr : = 1;

    for i : = 1 to 10 do

    a[i] : = - 50 + random (100) ;

    for i : = 1 to 10 do

    begin

    if (a[i] mod 2 = 1) or (a[i] mod 2 = - 1) then / / 1

    sum : = sum + a[i];

    if (i mod 2 = 0) then / / 2

    pr : = pr * a[i]

    else if (i mod 2 = 0) and (a[i] = 0) then

    pr : = 0;

    end;

    for i : = 1 to 10 do

    if (a[i] mod 10 = 0) then

    a[i] : = 0;

    for i : = 2 to 9 do / / 3

    begin

    if a[i] = 0 then

    if (a[i + 1] 0) and ((i + 1) mod 2 = 0) and (a[i - 1] 0) and ((i - 1) mod 2 = 0) then

    kol : = kol + 1;

    end;

    writeln ('сумму нечетных элементов = ', ' ', sum) ;

    writeln ('произведение элементов = ', ' ', pr) ;

    writeln ('число пар соседних элементов = ', ' ', kol) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Массив заполнен целыми числами [-50:50] в массиве 10 чисел 1) найти сумму нечетных элементов 2) найти произведение элементов расположенных ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Помогите решить задачи 1. Одномерный массив заполнен любыми числами. Заменить отрицательные элементы их модулями. 2. Одномерный массив заполнен целыми числами. Возвести в квадрат элементы, стоящие на четных местах.
Ответы (1)
В одномерном массиве, состоящем из n элементов, вычислить: 1) количество отрицательных элементов массива, расположенных на четных местах 2) сумму четных элементов массива, расположенных на нечетных местах.
Ответы (1)
1) Составте программуб которая заполняет массив а[1 ... 10] случайными целыми числами в диапозоне от 1 до 10, затем преобразовывает его, увеличивая все элементы с четными значениями на 1.
Ответы (1)
1) дан массив. найти сумму положительных и нечетных и количество отрицательных четных элементов 2) Дан массив целых чисел.
Ответы (1)
Хотя бы 3-4 задачи! 1) Дан одномерный целочисленный массив размерностью N. Найдите количество элементов, которые кратны 3 (5). 2) Дан одномерный целочисленный массив А, состоящий из N элементов. Найти сумму всех четных элементов массива.
Ответы (1)