// PascalABC.NET 3.0, сборка 1139 от 10.01.2016 begin //var n:=ReadInteger('Количество элементов в массиве: '); var a:=ArrRandom(25,155,172).Println(','); Write('Рост учеников больше среднего: '); var sr:=a.Average; a.Where(x->x>sr).OrderBy(x->x).PrintLn(',') end.
Тестовое решение: 161,162,168,163,170,165,163,156,161,162,158,169,165,159,161,170,162,172,155,161,159,156,155,172,162 Рост учеников больше среднего: 163,163,165,165,168,169,170,170,172,172
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку