Rabu, 07 Desember 2016

ELIMINASI INVERS {Inverse Elimination Method}



disp('TUGAS MATEMATIKA TEKNIK I')
disp('your name')
disp('everything you want to write')
disp('Taks')

disp('ELIMINASI INVERS')

E=[2 -2 3 -1 2 1 0 0 0 0;3 1 -2 1 -3 0 1 0 0 0;1 3 -4 3 -1 0 0 1 0 0;2 -1 3 -2 2 0 0 0 1 0;3 4 -3 5 -1 0 0 0 0 1]
S=[16;-11;-13;15;-10]

disp('LANGKAH PERTAMA')
disp('Baris ke 1 = Baris1:2')
E(1,:)=E(1,:)/2

disp('LANGKAH KEDUA')
disp('Baris ke 2 = Baris2-3xBaris1')
disp('Baris ke 3 = Baris3-Baris1')
disp('Baris ke 4 = Baris4-2xBaris1')
disp('Baris ke 5 = Baris5-3xBaris1')
E(2,:)=E(2,:)-3*E(1,:)
E(3,:)=E(3,:)-E(1,:)
E(4,:)=E(4,:)-2*E(1,:)
E(5,:)=E(5,:)-3*E(1,:)

disp('LANGKAH KETIGA')
disp('Baris ke 2 = Baris2:4')
E(2,:)=E(2,:)/4

disp('LANGKAH KEEMPAT')
disp('Baris ke 3 = Baris3-4xBaris2')
disp('Baris ke 4 = Baris4-Baris2')
disp('Baris ke 5 = Baris5-7xBaris2')
E(3,:)=E(3,:)-4*E(2,:)
E(4,:)=E(4,:)-E(2,:)
E(5,:)=E(5,:)-7*E(2,:)

disp('LANGKAH KELIMA')
disp('Baris ke 4 = Baris4-(13/8)Baris3')
disp('Baris ke 5 = Baris5-(31/8)Baris3')
E(4,:)=E(4,:)-(13/8)*E(3,:)
E(5,:)=E(5,:)-(31/8)*E(3,:)

disp('LANGKAH KEENAM')
disp('Baris ke 4 = Baris4:(-13/4)')
E(4,:)=E(4,:)/(-13/4)

disp('LANGKAH KETUJUH')
disp('Baris ke 5 = Baris5-(-7/4)Baris4')
E(5,:)=E(5,:)-(-7/4)*E(4,:)

disp('LANGKAH KEDELAPAN')
disp('Baris ke 5 = Baris5:(-82/13)')
E(5,:)=E(5,:)/(-82/13)

disp('LANGKAH KESEMBILAN')
disp('Baris ke 4 = Baris4-(20/13)Baris5')
disp('Baris ke 3 = Baris3-4xBaris5')
disp('Baris ke 2 = Baris2-(-3/2)Baris5')
disp('Baris ke 1 = Baris1-Baris5')
E(4,:)=E(4,:)-(20/13)*E(5,:)
E(3,:)=E(3,:)-4*E(5,:)
E(2,:)=E(2,:)-(-3/2)*E(5,:)
E(1,:)=E(1,:)-E(5,:)

disp('LANGKAH KESEPULUH')
disp('Baris ke 3 = Baris3-Baris4')
disp('Baris ke 2 = Baris2-(5/8)Baris4')
disp('Baris ke 1 = Baris1-(-1/2)Baris4')
E(3,:)=E(3,:)-E(4,:)
E(2,:)=E(2,:)-(5/8)*E(4,:)
E(1,:)=E(1,:)-(-1/2)*E(4,:)

disp('LANGKAH KESEBELAS')
disp('Baris ke 2 = Baris2-(-13/8)Baris3')
disp('Baris ke 1 = Baris1-(3/2)Baris3')
E(2,:)=E(2,:)-(-13/8)*E(3,:)
E(1,:)=E(1,:)-(3/2)*E(3,:)

disp('LANGKAH KEDUA BELAS')
disp('Baris 1 = Baris1+Baris2')
E(1,:)=E(1,:)-(-E(2,:))

Invers_M=[E(1,6) E(1,7) E(1,8) E(1,9) E(1,10);
    E(2,6) E(2,7) E(2,8) E(2,9) E(2,10);
    E(3,6) E(3,7) E(3,8) E(3,9) E(3,10);
    E(4,6) E(4,7) E(4,8) E(4,9) E(4,10);
    E(5,6) E(5,7) E(5,8) E(5,9) E(5,10);]

X=Invers_M*S
disp('Sehingga didapatkan nilai dari Masing-Masing x adalah:')
x5=X(5,1)
x4=X(4,1)
x3=X(3,1)
x2=X(2,1)
x1=X(1,1)

Tidak ada komentar:

Posting Komentar