Есть ответ 👍

Составить ! количество чисел задается пользователем: чтобы найти среднее арифметическое надо: 1. запросить у пользователя сколько вводится чисел(n) 2. сравнить количество чисел с нулем 2.1 если количество чисел > 0 (т. к. количество чисел должно быть натуральным), то: 2.1.1 т. к. мы будем находить сумму чисел, значит начальное значение следует приравнять 0 2.1.2 выполнять цикл мы будем n раз. в цикле мы должны: 2.1.2.1 запросить число(а) 2.1.2.2 к полученной сумме прибавить введенное число 2.1.3 найти среднее арифметическое введенных чисел 2.1.4 вывести полученное значение 2.2 если количество чисел < =0 то: 2.2.1 вывести сообщение об ошибке.

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

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

snojkox
4,5(73 оценок)

Var   a,sum,i,n: integer; begin   readln(n);   if n< =0 then   writeln('n не натуральное число')   else   begin   sum: =0;   for i: =1 to n do   begin     read(a);     sum: =sum+a;   end;     writeln(sum/n);   end; end.

8иероглифов было в египетском письме это сообщил великий король египта рульфед очиген  он передавал письма всем кого знал и король египта сказал вернут все письма и собрал  он именно передал 8 человеку  вот так 8 иероглифов в египеском письме

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