Дан целочисленный массив из 30 элементов (рост учащихся). Найти максимальный рост, среди учащихся не выше 175.

// PascalABC.NET 3.0, сборка 1160 от 05.02.2016begin  var r:=ArrRandom(30,157,185).Println;  Writeln('Средний рост для тех, кто не выше 175, равен ',    r.Where(x->x<=175).Average:0:1)end.Тестовое решение:166 159 174 179 179 169 157 168 176 184 161 183 171 162 176 170 180 176 167 170 163 165 179 172 161 167 176 164 178 171Средний рост для тех, кто не выше 175, равен 166.2