Регистрация
Yulia2107
20.12.2021 20:13
Информатика
Есть ответ 👍

Найти среднее арифметическое элементов последовательности превосходящих некоторое число с. размер произвольный. c вводится с экрана.

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

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

neoguy228
neoguy228
4,4(50 оценок)
Var   i,n,k: integer;   t,s,c: real;   begin   write('c='); read(c);   write('количество чисел: '); read(n);   s: =0; k: =0;   write('вводите: ');   for i: =1 to n do begin       read(t);       if t> c then begin           s: =s+t;           k: =k+1           end       end;   if k> 0 then writeln('среднее арифметическое: ',c/k)   else writeln('нет чисел, превышающих ',c) end. пример c=18.5 количество чисел: 10 вводите: 12.4 15 8.6 -4.12 0 17.34 21 0.12 21.15 19 среднее арифметическое: 6.16666666666667
cleverprincess
cleverprincess
4,4(100 оценок)
B= 2405 (6 сс) =2*6^3 +4*6^2+5=   581 (10сс) c = 137 (9сс) = 9^2 +3*9+7 = 115 (10cc) b - c = 581-115 = 466 (10cc) 466 | 16 464 |   |   29 | 16                           466 (10cc) = 1d2 (16cc)     2       16 |           |   1             13                                     ответ   1d2

Популярно: Информатика