Может ли функция в паскале возвращать два значения?

Функция может изменять переданный (-ые) ей параметры.
Но возвращает всегда только одно значение.

К примеру можно так:

function myFunc(A, B : Integer; var R : Integer) : Boolean;
begin
if B = 0 then begin myFunc := False; Exit; end;
R := A div B;
myFunc := A mod B = 0;
end;

… { и где-то в программе }
if myFunc(N1, N2, D) then WriteLn(N1, ' : ', N2, ' = ', D)
else WriteLn('Число ', N1, ' не делится нацело на ', N2);