Найти сумму всех элементов массива целых чисел,которые меньше среднего арифметического элементов массива.размерность массива-20.заполнение массива осуществить случайными числами от 150 до 300

102

107

Посмотреть ответы 2

Ответы на вопрос:

1995timoha30

Информатика

4,6(86 оценок)

vara: array [1..20] of integer; i,s: integer; k: real; beginrandomize; k: =0; for i: =1 to 20 do begin a[i]: =random(150)+150; k: =k+a[i]; write(a[i],' '); end; k: =k/20; s: =0; for i: =1 to 20 do if a[i]< k then s: =s+a[i]; writeln; writeln('среднее арифм. = ',k); writeln('сумма элементов массива меньших ',k,' = ',s); end.

ольга1718

Информатика

4,6(99 оценок)

Поскольку язык не указан, то выбираю c#.net ограничители не указаны потому будем брать минимальные входящие - 3 переменный типа byte или массив byte[3] исходящие - переменная типа float