%Dane
2 P=[2, 3, 1; 4, 1, 2; 3, 5, 1];
3
4 A=P;
5
6 [lw, lk]=size(A);
7
8 detA=A(1,1)*A(2,2)*A(3,3) + A(1,2)*A(2,3)*A(3,1) + A(1,3)*A(2,1)*A(3,2) -
9 A(1,3)*A(2,2)*A(3,1) - A(1,1)*A(2,3)*A(3,2) - A(1,2)*A(2,1)*A(3,3);
10
11 disp("Wyznacznik: ");
12 disp(detA);
13 X=det(P);
14 disp("Sprawdzenie wyznacznika: ");
15 disp(X);
16