На соревнованиях выступление спортсмена оценивают 5 экспертов, каждый из них выставляет оценку в баллах (целое число). Для получения итоговой оценки лучшая и худшая из оценок экспертов отбрасываются, а для оставшихся трёх находится среднее арифметическое. Напишите программу, которая принимает 5 оценок экспертов и возвращает итоговую оценку спортсмена. Используйте функцию для вычисления итоговой оценки. Входные данные
Входная строка содержит 5 неотрицательных целых чисел, разделённых пробелами.
Выходные данные
Программа должна вывести в первой строке отброшенные оценки экспертов (минимальную, затем максимальную), разделив их пробелами. Во второй строке выводится одно вещественное число: итоговая оценка с двумя знаками в дробной части.
Примеры
входные данные
1 2 3 4 5
выходные данные
1 5
3.00

function mark(a, b, c, d, e:integer;var max,min:integer):real;beginif a>b then max:=a else max:=b;if c>max then max:=c;if d>max then max:=d;if e>max then max:=e;if a<b then min:=a else min:=b;if c<min then min:=c;if d<min then min:=d;if e<min then min:=e;mark:=(a+b+c+d+e-max-min)/3;end;var a,b,c,d,e,min,max:integer;m:real;beginreadln(a,b,c,d,e);m:=mark(a,b,c,d,e,max,min);writeln(min,' ',max);writeln(m:0:2);end.Пример:1 2 3 4 51 53.00