Функции и массивы Опции

[от compiler]

Добрый день!
Меня интересует возможность передачи массивов между функциями.
Допустим есть такое задание
написать программу которая б считала сумму максимального и минимального элемента матрицы (размеры вводит пользователь матрица заполняется случайными числами).
интересно было бы если тело программы выгляделло так
write(getsum(randmatr(usermatr())));
,где usermatr() возвращает размеры матрицы; randmatr() заполняет случ. числами; getsum() возвращает сумму.
для передачи размера можна использовать пользовательский тип

size = record 
	x,y : byte; 
end; 

, тогда usermatr будет выглядить так.

function usermatr(): size;
begin
	readln(usermatr.x);
	readln(usermatr.y);
end;

функции getsum и randmatr также легко реализуются в отдельности

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

[volvo]

Pred(X) - аналог (X - 1) ...

[compiler]

Pred(X) - аналог (X - 1) ...

точно