Дан массив из 20 чисел и некое число С.Найти среднее арифметическое
Дан массив из 20 чисел и некое число С.
Отыскать среднее арифметическое частей массива, которые больше заданного числа С и находятся на нечетных позициях.
Полученное число должно выводиться с 3-мя знаками после запятой.
Если не помните, как это сделать, перейдите по ссылке :
http://physic.kemsu.ru/pub/library/learn_pos/Free_Pascal/Free%20Pascal/soder/3_1_2.htm
Sample Input 1:
4 1 0 3 2 5 8 15 2 16 3 13 0 6 14 2 16 2 5 1
6
Sample Output 1:
12.667
Sample Input 2:
15 15 1 6 15 14 5 7 0 4 14 11 10 16 14 11 15 10 7 9
8
Sample Output 2:
13.833
1 ответ
Великина Таня
Var a:array [1..20] of integer;
i,k,s,c:integer;
begin
for i:= 1 to 20 do
a[i]:= Random(20);
writeln(a);
write('Введите число: ');
readln (c);
for i:=1 to 20 do
if (a[i] gt; c)and(i mod 2 = 1) then
begin
s:=s+a[i];
k:=k+1
end;
writeln('Cреднее арифметическое частей массива, которые больше ',c,' и находятся на нечетных позициях равно: ',s/k:0:3)
end.
i,k,s,c:integer;
begin
for i:= 1 to 20 do
a[i]:= Random(20);
writeln(a);
write('Введите число: ');
readln (c);
for i:=1 to 20 do
if (a[i] gt; c)and(i mod 2 = 1) then
begin
s:=s+a[i];
k:=k+1
end;
writeln('Cреднее арифметическое частей массива, которые больше ',c,' и находятся на нечетных позициях равно: ',s/k:0:3)
end.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Облако тегов