blob: 1372879accf9a2e8d86a97a418579a1fd8d2d1ff (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
clear;
close;
clc;
a =[1 1 1;2 2 5;4 6 8]
disp('x=[u;v;w]')
disp('R2=R2-R1,R3=R3-4*R1')
a(2,:)=a(2,:)-2*a(1,:);
a(3,:)=a(3,:)-4*a(1,:);
disp(a);
disp('R2<->R3')
b=a(2,:);
a(2,:)=a(3,:);
a(3,:)=b;
disp(a);
disp('The system is now triangular and the equations can be solved by Back substitution');
//end
|