Есть ответ 👍

Решить на языке pascal abc.net имеется последовательность натуральных чисел, число элементов которой нечётно. ноль – признак конца и в число элементов последовательности не входит. определите, является ли среднее из чисел последовательности больше среднего арифметического данной последовательности и выдайте полученный результат в виде yes | no.

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

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


Var a: array [1..100001] of longint; r,k: real; s: longint; begin t: =1; k: =0; while t< > 0 do   begin   read(t);   inc(k);   a[k]: =t;   s: =s+t;   end; r: =s/k; if a[k+1 div 2]> r then writeln('yes') else writeln('no'); end.
severina3
4,5(82 оценок)

Дан во вложении.


 Розв’язати задачу в Phyton: «Васєчкін прочекав у черзі на щеплення х хвилин. Визначити, скільки год

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