fider228
Опубликовано 6 лет назад по предмету Информатика от fider228


Дан массив из 20 чисел и некоторое число С. Найти среднее арифметическое элементов массива, которые больше заданного числа С и находятся на нечетных позициях. Полученное число должно выводиться с тремя знаками после запятой. Если не помните, как это сделать, перейдите по ссылке : 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. Ответ
    Ответ дан elenaklon
    var a:array [1..20] of integer;i,k,s,c:integer;beginfor i:= 1 to 20 doa[i]:= Random(20);writeln(a);write('Введите число: ');readln (c);for i:=1 to 20 doif (a[i] > c)and(i mod 2 = 1) thenbegins:=s+a[i];k:=k+1end;writeln('Cреднее арифметическое элементов массива, которые больше ',c,' и находятся на нечетных позициях равно: ',s/k:0:3)end.
Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц