 
Как найти среднее арифметическое в одномерном массиве, если включен генератор случайных чисел?
 0
        0
         0
        0
    Ответы на вопрос
 
        i:integer;
sr:real;
begin
for i:=1 to 20 do begin
a[i]:=random(-20,20);
sr+=a[i];
write(a[i],' ');
end;
writeln;
write(sr/20:3:2);
end.
 0
                    0
                     0
                    0
                 
            Среднее арифметическое в одномерном массиве - это сумма всех элементов массива, деленная на их количество. Если включен генератор случайных чисел, то элементы массива будут заполнены случайными значениями в заданном диапазоне. Например, если мы хотим создать массив из 10 целых чисел от 1 до 100, то мы можем использовать следующий код на языке Pascal:
```pascal var a: array [1..10] of integer; // объявляем массив из 10 целых чисел i: integer; // переменная для цикла sum, avg: real; // переменные для суммы и среднего арифметического begin randomize; // включаем генератор случайных чисел sum := 0; // обнуляем сумму for i := 1 to 10 do // цикл по элементам массива begin a[i] := random(100) + 1; // присваиваем элементу массива случайное число от 1 до 100 sum := sum + a[i]; // добавляем элемент к сумме end; avg := sum / 10; // вычисляем среднее арифметическое writeln('Среднее арифметическое в массиве = ', avg); // выводим результат end. ```
Для других языков программирования вы можете посмотреть примеры кода в интернете, например, на сайте [Stack Overflow на русском](https://ru.stackoverflow.com/questions/1476548/%d0%9d%d0%b0%d0%b9%d1%82%d0%b8-%d1%81%d1%80%d0%b5%d0%b4%d0%bd%d0%b5%d0%b5-%d0%b0%d1%80%d0%b8%d1%84%d0%bc%d0%b5%d1%82%d0%b8%d1%87%d0%b5%d1%81%d0%ba%d0%be%d0%b5-%d0%b2%d1%81%d0%b5%d1%85-%d1%8d%d0%bb%d0%b5%d0%bc%d0%b5%d0%bd%d1%82%d0%be%d0%b2-%d0%bc%d0%b0%d1%81%d1%81%d0%b8%d0%b2%d0%b0-%d0%ba%d0%be%d1%82%d0%be%d1%80%d1%8b%d0%b5-%e2%88%88x-y-x-y-%d0%b2%d0%b2%d0%be%d0%b4%d0%b8) или [ACMP.RU](https://acmp.ru/article.asp?id_text=149).
 0
                    0
                     0
                    0
                Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
- 
			Математика 
- 
			Литература 
- 
			Алгебра 
- 
			Русский язык 
- 
			Геометрия 
- 
			Английский язык 
- 
			Химия 
- 
			Физика 
- 
			Биология 
- 
			Другие предметы 
- 
			История 
- 
			Обществознание 
- 
			Окружающий мир 
- 
			География 
- 
			Українська мова 
- 
			Информатика 
- 
			Українська література 
- 
			Қазақ тiлi 
- 
			Экономика 
- 
			Музыка 
- 
			Право 
- 
			Беларуская мова 
- 
			Французский язык 
- 
			Немецкий язык 
- 
			МХК 
- 
			ОБЖ 
- 
			Психология 
- 
			Физкультура и спорт 
- 
			Астрономия 
- 
			Кыргыз тили 
- 
			Оʻzbek tili 
 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			