Program2.pas(18) : Нельзя преобразовать тип function(x: mas;y: integer): integer к integer
Я не в курсе о таком :С

Сама задача состоит в том, чтобы найти наибольный общий делитель заданных n чисел