Pemodelan menggunakan vektor dan matrix, yang harus diperhatikan adalah pendeklarasian type vektor dan matrik seperti berikut :
type TVektor=array[0..2] of real;
Tmatriks=array[0..2,0..2] of real;
Fungsi-fungsi yang dibutuhkan adalah perkalian matrix terhadap vektor, tentunya harus menggunakan ordo yang sama.
function perkalianmatriksvektor(matriks:TMatriks;vektor:TVektor):tvektor;
var i,j:integer;
begin
for i:=0 to high(matriks) do
begin
result[i]:=0;
for j:=0 to high(vektor) do
result[i]:=result[i]+matriks[i,j]*vektor[j];
end;
end;





