Kamis, 01 Januari 2015

TP 5 METODE NUMERIK




Tugas Pendahuluan 5.
PRAKTIKUM
METODE NUMERIK
OLEH
LUH PUTU SUCI VANDASARI
F1A113054
KELAS A

JURUSAN MATEMATIKA
PROGRAM STUDI MATEMATIKA
FAKULTAS MATEMATIKA DAN ILMU PENGETAHUAN ALAM
UNIVERSITAS HALU OLEO
2014
 


SOAL.
1.      Program Metode Crammernya diperbaiki dan buat jadi program umum.
2.      Dengan cara manual selesaikan SPL berikut dengan iteras Jacobi.
Lalu cari dan coba kerjaka untuk SPL yang tidak memenuhi syarat iterasi Jacobi (harus beda).

PENYELESAIAN.
1.      Program Metode Crammer
clear all;
clc;
format rat;
disp('PROGRAM METODE CRAMMER MATRIKS')
disp('______________________________')
disp(' ')
disp('Matriks A')
s=input('Input BanyakBaris = ');
u=input('Input BanyakKolom = ');
disp(' ')
for i=1:s;
for j=1:u;
c(i,j)=input(['Elemen [',num2str(i),',',num2str(j),'] matriks = ']);
end
end
disp(' ');
disp(['Matriks A Ordo ',num2str(s),'x',num2str(u),' Adalah :']);
c
x=det(c);
disp(['|A| = ',num2str(x)])
disp(' ')
disp('Matriks B')
disp(['Banyakbaris = ',num2str(s)])
disp('Banyakkolom = 1')
for i=1:s;
for j=1;
d(i,j)=input(['Elemen [',num2str(i),',',num2str(j),'] matriks = ']);
end
end
disp(' ')
disp(['Matriks B Ordo ',num2str(s),'x','1 Adalah :']);
d
t=1;
disp('Maka :')
while t<=u;
    Y=c;
for i=1:u;
Y(i,t)=d(i);
end
    Y1=det(Y);
    q=Y1/x;
disp(['|A',num2str(t),'| = ',num2str(Y1),' => x',num2str(t),' = ',num2str(q)])
disp(' ')
    t=t+1;
end

Hasil run cari sendiri! jangan manja^^

Tidak ada komentar:

Posting Komentar