Задать вопрос
14 августа, 10:05

Вычислить среднее арифметическое значение тех элементов одновременного массива, которые попадают в интервал от - 2 до 10. Размерность массива произвольная. ИЛИ Дан массив, содержащий 12 элементов и заполненный по формуле A = (i-4) / (3*i). Найти количество элементов в этом массиве больших 0, но меньших 0,2. (решение писать как в турбо паскале)

+4
Ответы (1)
  1. 14 августа, 12:02
    0
    const

    n=10;

    var

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

    i, s, k:integer;

    sr:real;

    begin

    randomize;

    s:=0;

    k:=0;

    for i:=1 to n do begin

    a[i]:=random (31) - 10;

    write (a[i],' ') ;

    if (a[i]>-2) and (a[i]<10) then

    begin

    k:=k+1;

    s:=s+a[i];

    end;

    end;

    writeln;

    sr:=s/k;

    writeln (sr:0:2) ;

    readln;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Вычислить среднее арифметическое значение тех элементов одновременного массива, которые попадают в интервал от - 2 до 10. Размерность ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы