[настя0301]

В общем надо решить следующую задачу: Известно, что в следующем фрагменте программы массив матрица содержит оценки студентов группы, фамилии которых перечислены в типе фамилий
type
fam=(Ivanov,Petrov,Sidorov);
pred=(Algebra,Russkii,Informatika);
var
matr:array[fam,pred] of integer

Необходимо выяснить сколько студентов группы имеют средний балл, наименее всего отклоняющийся по абсолютному значению от среднего балла всей группы.
Не могу понять как решать с помощью процедуры и функции.Помогите!!!Особенно волнует пункт:наименее всего отклоняющийся по абсолютному значению от среднего балла всей группы.Помогите решить без использования abs и inc.

[ChinYan]

У вас двумерный массив:
Фамилия*Предмет
то есть первый индекс - номер фамилии, а второй - предмета. В элементе с указанными индексами и лежит оценка.

Пройдите по всем фамилиям, зафиксировав предмет, и сосчитайте средний балл по всем студентам для этого предмета.
Потом пройдясь по всем студентам, найдите того, чей балл меньше всего отличается от полученного среднего.

Функция - подпрограмма, возвращающая значение туда, где была вызвана
Процедура - подпрограмма, не возвращающая результата

Если нужно больше помощи - вам в раздел работа