// PascalABC.NET 3.0, сборка 1128 begin var n:=ReadInteger('Введите количество элементов:'); var a:=ArrRandom(n,-10,20); a.Println(','); WriteFormat('Среднее арифметическое равно {0}',a.Average) end.
Тестовое решение: Введите количество элементов: 10 -2,6,6,-6,-6,16,18,15,14,7 Среднее арифметическое равно 6.8
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку