clc;
disp('====================================')
disp('selamat datang di program ini')
disp(' MOHAMAD NUR FAUZI ')
disp(' kelAs 3D ')
disp(' 10.1.01.05.0164 ')
disp('===================================')
disp('')
pilih='Y';
while upper(pilih)=='Y';
disp('Program Pilihan Anda')
disp('1.SPL jika diketahui 2 persamaan dan 2 variabel')
disp('2.SPL jika diketahui 3 persamaan dan 3 variabel')
disp('3.Mencari matriks minor,kofaktor,adjoin & invers dari matriks 3x3')
disp('4.Mencari determinan matriks 2x2')
disp('5.Mencari determinan matriks 3x3')
disp('6.Program membuat gambar 2 dimensi')
disp('7.Program membuat gambar 3 dimensi')
disp('8.program mencari barisan aritmatika')
disp('9.program mencari barisan geometri')
disp('10.Menentukan kriteria temperatur')
disp('11.program statistika')
disp('');
pilih=input('program pilihan anda [1..11]:');
disp('');
switch pilih
case 1
disp('SPL jika diketahui 2 persamaan dan 2 variabel')
disp('susunlah SPL tsb menjadi matriks')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 2 kolom 1:');
d=input('masukkan baris 2 kolom 2:');
e=[a,b;c,d]
f=input('masukkan nilai x1:');
g=input('masukkan nilai x2:');
h=[f;g]
x=e\h;
disp(x)
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 2
disp('SPL jika diketahui 3 persamaan dan 3 variabel')
disp('susunlah SPL tsb menjadi matriks ')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 1 kolom 3:');
d=input('masukkan baris 2 kolom 1:');
e=input('masukkan baris 2 kolom 2:');
f=input('masukkan baris 2 kolom 3:');
l=input('masukkan baris 3 kolom 1:');
m=input('masukkan baris 3 kolom 2:');
n=input('masukkan baris 3 kolom 3:');
u=[a,b,c;d,e,f;l,m,n]
g=input('masukkan hasil dari persamaan 1:');
h=input('masukkan hasil dari persamaanv2:');
i=input('masukkan hasil dari persamaan 3:');
k=[g;h;i]
x=u\k;
disp('jadi penyelesaiannya adalah')
disp(x)
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 3
disp('3.Mencari matriks minor,kofaktor,adjoin & invers dari matrik 3x3')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 1 kolom 3:');
d=input('masukkan baris 2 kolom 1:');
e=input('masukkan baris 2 kolom 2:');
f=input('masukkan baris 2 kolom 3:');
g=input('masukkan baris 3 kolom 1:');
h=input('masukkan baris 3 kolom 2:');
i=input('masukkan baris 3 kolom 3:');
u=[a,b,c;d,e,f;g,h,i]
disp('matriks minor')
M11=[e,f;h,i]
M12=[d,f;g,i]
M13=[d,e;g,h]
M21=[b,c;h,i]
M22=[a,c;g,i]
M23=[a,b;g,h]
M31=[b,c;e,f]
M32=[a,c;d,f]
M33=[a,b;d,e]
disp('kofaktor')
A11=e*i-f*h
A12=-(d*i-f*g)
A13=d*h-e*g
A21=-(b*i-c*h)
A22=a*i-c*g
A23=-(a*h-b*g)
A31=b*f-c*e
A32=-(a*f-c*d)
A33=a*e-b*d
disp('adjoin')
adjoin=[A11,A12,A13;A21,A22,A23;A31,A32,A33]'
disp('invers')
invers=inv(u)
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 4
disp('program mencari determinan matriks 2x2')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 2 kolom 1:');
d=input('masukkan baris 2 kolom 2:');
e=[a,b;c,d]
u=a*d-b*c;
disp('jadi determinannya adalah:')
disp(u)
disp('terima kasih atas kunjunganya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 5
disp('mencari determinan matriks 3x3')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 1 kolom 3:');
d=input('masukkan baris 2 kolom 1:');
e=input('masukkan baris 2 kolom 2:');
f=input('masukkan baris 2 kolom 3:');
g=input('masukkan baris 3 kolom 1:');
h=input('masukkan baris 3 kolom 2:');
i=input('masukkan baris 3 kolom 3:');
u=[a,b,c;d,e,f;l,m,n]
d=a*e*i+b*f*g+c*d*h-c*e*g-a*f*h-b*d*i;
disp(['jadi determinannya:',num2str(d)])
disp('terima kasih atas kunjunganya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 6
disp('selamat datang di program membuat plot/gambar')
disp('fauzi')
x=input('masukkan x:')
y =input('masukkan rumus y:');
xlabel(' sumbu x')
ylabel(' sumbu y')
plot(x,y)
title('fauzi 3d')
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 7
t=input('masukkan nilai t:')
x =input('masukkan rumus x:')
y =input('masukkan rumus y:')
z =input('masukkan rumus z:')
plot3(x,y,z)
xlabel('sumbu x'); ylabel('sumbu y');
zlabel('sumbu z');
title ('fauzi');
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 8
clc;
clear all;
disp('program mencari barisan aritmatika')
disp('menggunakan rumus "for end"')
a=input('masukkan suku pertama:');
b=input('masukkan beda:');
n=input('masukkan suku yang ingin anda cari:');
u=a:b:n;
for u=n;
f(u)=input('masukkan rumus Un:')
end
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
case 9
clc;
clear all;
disp('program mencari barisan geometri')
disp('menggunakan rumus "for end"')
a=input('masukkan suku pertama:');
b=input('masukkan beda:');
n=input('masukkan suku yang ingin anda cari:');
r=b/a;
u=a:r:n;
for u=n;
f(u)=a*r^(n-1);
f
end
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
case 10
disp('menentukan temperatur suhu oven dalam membuat roti menggunakan "if elseif end"')
angka=input('masukkan temperatur suhu oven(celsius):')
if (angka >= 225);
keterangan='Sangat Panas';
elseif(angka >=200);
keterangan='Panas';
elseif(angka >=190);
keterangan='lumayan Panas';
elseif(angka >=180)
keterangan='Sedang';
elseif(angka >=160);
keterangan='lambat';
else
keterangan= 'Sangat Lambat';
end
fprintf('temperatur suhu oven anda:%s\n',keterangan)
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
case 11
clear all;
disp('program statistika')
disp('contoh penulisan data & berilah spasi tiap data yang anda masukkan');
disp('contoh [10 20 30 ...]');
x=input('masukkan data yang ingin anda hitung:');
rata_rata=mean(x);
median=median(x);
standar_deviasi=std(x);
varians=var(x);
disp(['jadi nilai rata-ratanya:',num2str(rata_rata)])
disp(['jadi nilai tengahnya:',num2str(median)])
disp(['jadi nilai standar deviasi:',num2str(standar_deviasi)])
disp(['jadi nilai varians:',num2str(varians)])
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
case 12
disp('keluar dari program');
return;
otherwise
disp('ada kesalahan pada pilihan anda');
end
end
Terima Kasih atas kunjungannya dan Semoga Bermanfaat jangan lupa komentarnya untuk membangun blog ini untuk menjadi semakin baik. Mohon maaf jika ada postingan yang kurang berkenan di hati anda.
disp('====================================')
disp('selamat datang di program ini')
disp(' MOHAMAD NUR FAUZI ')
disp(' kelAs 3D ')
disp(' 10.1.01.05.0164 ')
disp('===================================')
disp('')
pilih='Y';
while upper(pilih)=='Y';
disp('Program Pilihan Anda')
disp('1.SPL jika diketahui 2 persamaan dan 2 variabel')
disp('2.SPL jika diketahui 3 persamaan dan 3 variabel')
disp('3.Mencari matriks minor,kofaktor,adjoin & invers dari matriks 3x3')
disp('4.Mencari determinan matriks 2x2')
disp('5.Mencari determinan matriks 3x3')
disp('6.Program membuat gambar 2 dimensi')
disp('7.Program membuat gambar 3 dimensi')
disp('8.program mencari barisan aritmatika')
disp('9.program mencari barisan geometri')
disp('10.Menentukan kriteria temperatur')
disp('11.program statistika')
disp('');
pilih=input('program pilihan anda [1..11]:');
disp('');
switch pilih
case 1
disp('SPL jika diketahui 2 persamaan dan 2 variabel')
disp('susunlah SPL tsb menjadi matriks')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 2 kolom 1:');
d=input('masukkan baris 2 kolom 2:');
e=[a,b;c,d]
f=input('masukkan nilai x1:');
g=input('masukkan nilai x2:');
h=[f;g]
x=e\h;
disp(x)
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 2
disp('SPL jika diketahui 3 persamaan dan 3 variabel')
disp('susunlah SPL tsb menjadi matriks ')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 1 kolom 3:');
d=input('masukkan baris 2 kolom 1:');
e=input('masukkan baris 2 kolom 2:');
f=input('masukkan baris 2 kolom 3:');
l=input('masukkan baris 3 kolom 1:');
m=input('masukkan baris 3 kolom 2:');
n=input('masukkan baris 3 kolom 3:');
u=[a,b,c;d,e,f;l,m,n]
g=input('masukkan hasil dari persamaan 1:');
h=input('masukkan hasil dari persamaanv2:');
i=input('masukkan hasil dari persamaan 3:');
k=[g;h;i]
x=u\k;
disp('jadi penyelesaiannya adalah')
disp(x)
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 3
disp('3.Mencari matriks minor,kofaktor,adjoin & invers dari matrik 3x3')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 1 kolom 3:');
d=input('masukkan baris 2 kolom 1:');
e=input('masukkan baris 2 kolom 2:');
f=input('masukkan baris 2 kolom 3:');
g=input('masukkan baris 3 kolom 1:');
h=input('masukkan baris 3 kolom 2:');
i=input('masukkan baris 3 kolom 3:');
u=[a,b,c;d,e,f;g,h,i]
disp('matriks minor')
M11=[e,f;h,i]
M12=[d,f;g,i]
M13=[d,e;g,h]
M21=[b,c;h,i]
M22=[a,c;g,i]
M23=[a,b;g,h]
M31=[b,c;e,f]
M32=[a,c;d,f]
M33=[a,b;d,e]
disp('kofaktor')
A11=e*i-f*h
A12=-(d*i-f*g)
A13=d*h-e*g
A21=-(b*i-c*h)
A22=a*i-c*g
A23=-(a*h-b*g)
A31=b*f-c*e
A32=-(a*f-c*d)
A33=a*e-b*d
disp('adjoin')
adjoin=[A11,A12,A13;A21,A22,A23;A31,A32,A33]'
disp('invers')
invers=inv(u)
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 4
disp('program mencari determinan matriks 2x2')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 2 kolom 1:');
d=input('masukkan baris 2 kolom 2:');
e=[a,b;c,d]
u=a*d-b*c;
disp('jadi determinannya adalah:')
disp(u)
disp('terima kasih atas kunjunganya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 5
disp('mencari determinan matriks 3x3')
a=input('masukkan baris 1 kolom 1:');
b=input('masukkan baris 1 kolom 2:');
c=input('masukkan baris 1 kolom 3:');
d=input('masukkan baris 2 kolom 1:');
e=input('masukkan baris 2 kolom 2:');
f=input('masukkan baris 2 kolom 3:');
g=input('masukkan baris 3 kolom 1:');
h=input('masukkan baris 3 kolom 2:');
i=input('masukkan baris 3 kolom 3:');
u=[a,b,c;d,e,f;l,m,n]
d=a*e*i+b*f*g+c*d*h-c*e*g-a*f*h-b*d*i;
disp(['jadi determinannya:',num2str(d)])
disp('terima kasih atas kunjunganya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 6
disp('selamat datang di program membuat plot/gambar')
disp('fauzi')
x=input('masukkan x:')
y =input('masukkan rumus y:');
xlabel(' sumbu x')
ylabel(' sumbu y')
plot(x,y)
title('fauzi 3d')
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 7
t=input('masukkan nilai t:')
x =input('masukkan rumus x:')
y =input('masukkan rumus y:')
z =input('masukkan rumus z:')
plot3(x,y,z)
xlabel('sumbu x'); ylabel('sumbu y');
zlabel('sumbu z');
title ('fauzi');
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
disp('');
case 8
clc;
clear all;
disp('program mencari barisan aritmatika')
disp('menggunakan rumus "for end"')
a=input('masukkan suku pertama:');
b=input('masukkan beda:');
n=input('masukkan suku yang ingin anda cari:');
u=a:b:n;
for u=n;
f(u)=input('masukkan rumus Un:')
end
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
case 9
clc;
clear all;
disp('program mencari barisan geometri')
disp('menggunakan rumus "for end"')
a=input('masukkan suku pertama:');
b=input('masukkan beda:');
n=input('masukkan suku yang ingin anda cari:');
r=b/a;
u=a:r:n;
for u=n;
f(u)=a*r^(n-1);
f
end
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
case 10
disp('menentukan temperatur suhu oven dalam membuat roti menggunakan "if elseif end"')
angka=input('masukkan temperatur suhu oven(celsius):')
if (angka >= 225);
keterangan='Sangat Panas';
elseif(angka >=200);
keterangan='Panas';
elseif(angka >=190);
keterangan='lumayan Panas';
elseif(angka >=180)
keterangan='Sedang';
elseif(angka >=160);
keterangan='lambat';
else
keterangan= 'Sangat Lambat';
end
fprintf('temperatur suhu oven anda:%s\n',keterangan)
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
case 11
clear all;
disp('program statistika')
disp('contoh penulisan data & berilah spasi tiap data yang anda masukkan');
disp('contoh [10 20 30 ...]');
x=input('masukkan data yang ingin anda hitung:');
rata_rata=mean(x);
median=median(x);
standar_deviasi=std(x);
varians=var(x);
disp(['jadi nilai rata-ratanya:',num2str(rata_rata)])
disp(['jadi nilai tengahnya:',num2str(median)])
disp(['jadi nilai standar deviasi:',num2str(standar_deviasi)])
disp(['jadi nilai varians:',num2str(varians)])
disp('terima kasih atas kunjungannya')
pilih=input('coba menu yang lain [Y/T]?','s');
case 12
disp('keluar dari program');
return;
otherwise
disp('ada kesalahan pada pilihan anda');
end
end
Terima Kasih atas kunjungannya dan Semoga Bermanfaat jangan lupa komentarnya untuk membangun blog ini untuk menjadi semakin baik. Mohon maaf jika ada postingan yang kurang berkenan di hati anda.
SAYA SANGAT BERTERIMAKASIH ATAS SHARE ILMUNYA SEMOGA MENJADI LADANG IBADAH TAPI BOLEH SAYA MINTA TOLONG BAGAIMANA MEMBUAT M FILE MINOR MATRIKS DAN JUGA KOFAKTOR MATRIKS, SYUKRON
ReplyDeletezuhrimuin63@gmail.com ini email saya
ReplyDelete