Задать вопрос
2 июля, 14:17

Задан массив А размерности N случайным образом.

Найти:

1 задача. Среднее арифметическое нечётных элементов

2 задача. Колическтво чётных элементов

(2 задачи отдельно)

+3
Ответы (1)
  1. 2 июля, 16:55
    0
    Program p1;

    Const N=10; //подставишь нужное N

    Var A:array[1 ... N] of integer;

    summa, kolvo, i:integer;

    Begin

    For i: = 1 to n do

    Begin

    A[i]:=random (101) - 50;

    Write (A[i],' ') ;

    End;

    Writeln;

    For i: = 1 to n do

    If a[i] mod 20 then

    Begin

    summa:=summa+A[i];

    kolvo:=kolvo+1;

    End;

    Writeln ('Среднее арифметическое = ', summa/kolvo) ;

    End.

    Program p2;

    Const N=10; //подставишь нужное N

    Var A:array[1 ... N] of integer;

    kolvo, i:integer;

    Begin

    For i: = 1 to n do

    Begin

    A[i]:=random (101) - 50;

    Write (A[i],' ') ;

    End;

    Writeln;

    For i: = 1 to n do

    If a[i] mod 2=0 then

    kolvo:=kolvo+1;

    Writeln ('Число чётных элементов = ', kolvo) ;

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