Question

Срочно!!! В Паскале Разработайте программу по подсчёту очков для конкурса пения в школе, если всего в оценке конкурсантов участвуют 10 судей. Программа должна автоматически выставлять оценку — среднее арифметическое самого высокого и самого низкого баллов из выставленных судьями.

Answer 1

===== PascalABC.NET =====

begin

 var a := ReadArrInteger('Введите 10 оценок:', 10);

 Println((a.Max + a.Min) / 2)

end.