Participants of a trip:

A:matrix([1,1,1],[30,16,24],[40,24,34]);

determinant(A);

A1:matrix([45,1,1],[1116,16,24],[1542,24,34]);

determinant(A1);

determinant(A1)/determinant(A);

Ab:matrix([1,1,1,45],[30,16,24,1116],[40,24,34,1542]);

echelon(Ab);

solve([x+y+z=45,30*x+16*y+24*z=1116,40*x+24*y+34*z=1542]);

Savings

M:matrix([1,1/2],[1/2,1]);

V:matrix([10],[20]);

M^^11;

(M^^11).V;

float((M^^11).V);

N:matrix([0,0],[0,0]);

for i:1 thru 11 step 1 do N:N+M^^i;

N;

r:N.V;float(r);

r[1,1]+r[2,1];float(r[1,1]+r[2,1]);

eigenvectors(M);

float(15*(3/2)^11-5*(1/2)^11);

float(15*(1/2)^11+5*(3/2)^11);

float(15*(3/2)^11*matrix([1],[1])-5*(1/2)^11*matrix([1],[11]));

Pond

P:matrix([0,3,3],[0.2,0,0],[0,0.6,x]);

Plam:matrix([-l,3,3],[0.2,-l,0],[0,0.6,x-l]);

eq:determinant(Plam);

eq2:subst([l=1],eq);

solve(eq2);

eigenvalues(P);