TUGAS NO.1
Input
clc
disp('=========================');
disp('TUGAS PRAKTIKUM KOMPUTASI');
disp('=========================');
disp('TUGAS NO. 1');
disp('PERSAMAAN KUADRAT');
a=input('koefisien di x^2= ');
b=input('koefisien di x= ');
c=input('konstanta= ');
D=b^2-(4*a*c);
x1=(-b+sqrt(D))/(2*a)
x2=(-b-(sqrt(D)))/2*a
if D>= 0
disp(['Akar bil. Real=',num2str(x)])
else
disp(['Akar bil. Kompleks=',num2str(x)])
end
X=[x1-5:0.1:x2+5];
f=a.*(X.^2)+ b.*X+c;
plot(X,f)
xlabel('Domain fungsi')
ylabel('Range fungsi')
title(['f(x)= ',num2str(a),'x^2+',num2str(b),'x+',num2str(c)])
text(mean(X),mean(f),['Akar = ',num2str(x)])
Output
=========================
TUGAS PRAKTIKUM KOMPUTASI
=========================
TUGAS NO. 1
PERSAMAAN KUADRAT
koefisien di x^2= 1
koefisien di x= 2
konstanta= 1
x1 =
-1
x2 =
-1
Akar bil. Real= -1
TUGAS NO.2
Input
clc
disp('==================================');
disp('TUGAS PRAKTIKUM KOMPUTASI');
disp('==================================');
disp('TUGAS 2');
disp('PENDAFTARAN SISWA BARU');
s=input('nama siswa baru= ');
UN=input('masukkan nilai UN= ');
TM=input('masukkan nilai tes masuk= ');
NA=40*UN/30+60%*TM
if NA <=30
kelas='IPA'
elseif 30<NA & NA<=50
kelas='IPS'
elseif 50<NA & NA<=70
kelas='Bahasa'
else
kelas='IPA/IPS'
end
Output
==================================
TUGAS PRAKTIKUM KOMPUTASI
==================================
TUGAS 2
PENDAFTARAN SISWA BARU
nama siswa baru= 'arum'
masukkan nilai UN= 25
masukkan nilai tes masuk= 60
NA =
93.3333
kelas =
IPA/IPS
TUGAS NO.3
Input
clc;
disp('==========================');
disp(' Integral dan Diferensial ');
disp('==========================');
F=input('masukkan persamaan = ');
disp('1. Integral ');
disp('2. Diferensial ');
n=input('yang anda pilih = ')
if (n==1)
clc;
b=input('batas bawah integral = ');
a=input('batas atas integral = ');
int(F,a,b)
ezplot(F,[a,b])
end
a=input('Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =');
switch a
case 1
tugas3
case 2
disp('Terima Kasih');
otherwise
disp('Pilihan anda tidak ada');
end
Output
==========================
Integral dan Diferensial
==========================
masukkan persamaan = 'x^2+2*x+1'
1. Integral
2. Diferensial
yang anda pilih = 2
n =
2
Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =2
Terima Kasih
TUGAS NO.4
Input
clc;
disp('=========================');
disp(' Bangun RUANG ');
disp('=========================');
disp('1. Kubus ');
disp('2. Balok ');
disp('3. Tabung ');
n=input('Pilihan anda = ');
disp('...........................');
disp('1. Luas ');
disp('2. Volume ');
m=input('pilihan anda = ');
disp('...........................');
%if...else
if (n==1&m==1)
clc;
s=input('panjang rusuk kubus= ');
L=6*s^2;
fprintf('Luas kubus dengan s= %2.0f adalah %2.0f',s,L);
elseif (n==1&m==2)
clc;
s=input('panjang rusuk kubus= ');
V=s^3;
fprintf('Volume kubus dengan s= %2.0f adalah %2.0f',s,V);
elseif (n==2&m==1)
clc;
p=input('panjang balok = ');
l=input('lebar balok = ');
t=input('tinggi balok = ');
L=2*(p*l+p*t+l*t);
fprintf('Luas Balok dengan p= %2.0f l= %2.0f dan t= %2.0f adalah %2.0f',p,l,t,L);
elseif (n==2&m==2)
clc;
p=input('panjang balok = ');
l=input('lebar balok = ');
t=input('tinggi balok = ');
V=p*l*t;
fprintf('Volume Balok dengan p= %2.0f l= %2.0f dan t= %2.0f adalah %2.0f',p,l,t,V);
elseif (n==3&m==1)
clc;
r=input('jari-jari lingkaran alas = ');
t=input('tinggi tabung = ');
L=2*pi*r*t;
fprintf('Luas Tabung dengan r= %2.0f dan t= %2.0f adalah %2.0f',r,t,L);
elseif (n==3&m==2)
clc;
r=input('jari-jari lingkaran alas = ');
t=input('tinggi tabung = ');
V=pi*r^2*t;
fprintf('Volume Tabung dengan r= %2.0f dan t= %2.0f adalah %2.0f',r,t,V);
end
disp(' ');
disp('------------------------------------------------');
a=input('Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =');
switch a
case 1
tugas4
case 2
disp('Terima Kasih');
otherwise
disp('Pilihan anda tidak ada');
end
Output
=========================
Bangun RUANG
=========================
1. Kubus
2. Balok
3. Tabung
Pilihan anda = 1
...........................
1. Luas
2. Volume
pilihan anda = 1
panjang rusuk kubus= 2
Luas kubus dengan s= 2 adalah 24
------------------------------------------------
Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =1
=========================
Bangun RUANG
=========================
1. Kubus
2. Balok
3. Tabung
Pilihan anda = 1
...........................
1. Luas
2. Volume
pilihan anda = 2
panjang rusuk kubus= 2
Volume kubus dengan s= 2 adalah 8
------------------------------------------------
Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =1
=========================
Bangun RUANG
=========================
1. Kubus
2. Balok
3. Tabung
Pilihan anda = 2
...........................
1. Luas
2. Volume
pilihan anda = 1
panjang balok = 2
lebar balok = 1
tinggi balok = 3
Luas Balok dengan p= 2 l= 1 dan t= 3 adalah 22
------------------------------------------------
Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =1
=========================
Bangun RUANG
=========================
1. Kubus
2. Balok
3. Tabung
Pilihan anda = 2
...........................
1. Luas
2. Volume
pilihan anda = 2
panjang balok = 2
lebar balok = 1
tinggi balok = 3
Volume Balok dengan p= 2 l= 1 dan t= 3 adalah 6
------------------------------------------------
Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =1
=========================
Bangun RUANG
=========================
1. Kubus
2. Balok
3. Tabung
Pilihan anda = 3
...........................
1. Luas
2. Volume
pilihan anda = 1
jari-jari lingkaran alas = 2
tinggi tabung = 1
Luas Tabung dengan r= 2 dan t= 1 adalah 13
------------------------------------------------
Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =1
=========================
Bangun RUANG
=========================
1. Kubus
2. Balok
3. Tabung
Pilihan anda = 3
...........................
1. Luas
2. Volume
pilihan anda = 2
jari-jari lingkaran alas = 2
tinggi tabung = 1
Volume Tabung dengan r= 2 dan t= 1 adalah 13
------------------------------------------------
Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =2
Terima Kasih
TUGAS NO.5
Input
clc;
disp('=======================');
disp(' SPLDV ');
disp('=======================');
f1=input('Persamaan pertama = ');
f2=input('Persamaan kedua = ');
n=input('panjang sumbu = ');
[x,y]=solve(f1,f2)
x=1:0.1:n;
f1=y;
plot(x,f1)
a=input('Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =');
switch a
case 1
tugas5
case 2
disp('Terima Kasih');
otherwise
disp('Pilihan anda tidak ada');
end
Output
=======================
SPLDV
=======================
Persamaan pertama = 'x+3*y=10'
Persamaan kedua = '2*x+y=5'
panjang sumbu = 2
x =
1
y =
3
Apakah anda ingin mengulang program ini?(1.ya/2.tidak) =2
Terima kasih
