Обратная матрица в паскаль

[jobbes]

Дана матрица. Надо представить ее в виде обратной матрицы. Как это сделать в паскале?

Пробовал так(но под сомнением):

Program Matrix;
var c, d, e, f, ao, amp: real;

begin
c := 2/5;
d := 1/5;
e := 1/3;
f := 1/3;

ao := (1-c)*(1-f) - (d)*(e); // в задании надо было еще из единичной матрицы вычесть нашу матрицу

amp := (1/ao)*(((1-f)*(1-c))*((-d)*(-e)));

writeln('Матрица A^-1:', amp);
end.