Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- clc, clear all, close all
- %Matriz Gauss Simple
- A=[9,21,-12;2,-4,-1;-3,-7,4];
- b=[5;6;-3];
- %Matriz Ampliada
- a=[A,b]
- det(A) %De acuerdo a esta solución determino qué sistema es
- %S.I.
- %cero en a(2,1)
- a(2,:)=a(1,1)*a(2,:)-a(2,1)*a(1,:)
- %cero en a(3,1)
- a(3,:)=a(1,1)*a(3,:)-a(3,1)*a(1,:)
- %cero en a(3,2)
- a(3,:)=a(2,2)*a(3,:)-a(3,2)*a(2,:)
- %sustitución hacia atrás
- z=a(3,4)/a(3,3)
- y=(a(2,4)-a(2,3)*z)/a(2,2)
- x=(a(1,4)-a(1,3)*z-a(1,2)*y)/a(1,1)
- %Comprobando
- xyz=[x;y;z]
- A*xyz
- b
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement