Developing.ru

Дано:
Type Rabotnik=record
ImiaFamilia : string;
RabociiDni : 1..31;
OplataZaDeni : real;
OplataZaMesiats : real;
end;
SpisokOplti=array [1..50] of Rabotnik;
а. считает среднюю зарплату сотрудников, включенных в список
в. отображает на экране данные про работников с максимальной месячной зарплатой

Буду очень благодарна за любые решения данных задач

1. В цикле от 1 до 50 пройти по массиву SpisokOplti, просуммировать OplataZaMesiats, разделить на 50
2. Ищем на этом форуме "сортировка массива". В данном случае сортировка по полю OplataZaDeni