LABORATORIUM TEKNIK KIMIA Nama : M.

REZA ARIEF PUTRA

FAKULTAS TEKNOLOGI INDUSTRI NPM/Semester : 1631010194/I
UPN “VETERAN” JAWA TIMUR Romb./Grup : III/E
Praktikum : PEMROGRAMAN KOMPUTER NPM/Teman Praktek : 1631010179/AFIFAH
Percobaan : ITC MATLAB DAN STATEMENT SALSABILA
PEMILIHAN KONDISI
Tanggal : 1 NOVEMBER 2016
Pembimbing : IR. TATIEK SRI HAJATI, MT LAPORAN RESMI

SOAL :

1. Apa perbedaan dari clear all dan clc, berikan alasan menurut pendapat kalian
sendiri?
2. Apa yang kalian ketahui tentang waktu komputasi, sebutkan dan jelaskan
jenisnya, beri contohnya ?
3. Buatlah program,flowchart, hasil run dan perhitungan manual pembuatan
larutan berikut:
a. Npm ganjil
Gunakan statement pemilihan kondisi switch case dan else if untuk
membedakan padatan dan cairan.
NaOH 3N 500 ml
HCl 3M 100ml
CH3COOH 10% 350 ml
MgCl2 5N 600 ml
b. Npm genap
Gunakan statement pemilihan kondisi switch case dan else if untuk
membedakan padatan dan cairan.
KOH 4N 550 ml
NH4OH 3M 200ml
C2H6O 60% 350 ml
KMnO4 5N 600 ml
4. Buatlah program,flowchart dan hasil run (tiap praktikan wajib berbeda):
a. Switch case
b. Else if
c. Switch case didalam Switch case
d. Else if didalam Else if
e. Switch case didalam Else if
f. Else if didalam Switch case
5. Selesaikan perhitungan berikut menggunakan program : (program, hasil run,
dan flowchart(variabel tiap praktikan wajib berbeda))
a. Npm Ganjil
a. 3𝑥 2 + 4𝑥 − 6 = 45
7𝑥 − 25 = 8
b. 8𝑥 2 − 7𝑥 + 34 = 27
24𝑥 + 3 = 21
25𝑥2 21 3 2
c. 34
+ 56 𝑥 − 4 = 5
2 3 6
𝑥− =
6 4 8
4𝑥 2 23 32 35
d. 24
+ 26 𝑥 − 45 = 52
23 24 62
𝑥− =
45 36 85
 e. 23𝑥 2 − 57𝑥 + 74 = 34
37𝑥 + 63 = 35
b. Npm Genap
1. 3𝑥 2 + 4𝑥 − 6 = 43
2. 5𝑥 2 + 6𝑥 − 2 = 27
3. √𝑥 − 27
4. √3𝑥 − 27
3𝑥 2 8 4
5. 5
+ 9 𝑥 − 26 = 6

6. Buatlah program, hasil run, dan flowchart

a. Else if didalam Switch case dengan tema keuntungan penjualan (NPM
ganjil)
b. Switch Case didalam Else if dengan tema Penggolongan Gaji(NPM
genap)
7. Selesaikan soal berikut menggunakan program(program, hasil run, flowchart)
Diketahui suatu pabrik membangun instalasi pengolahan limbah baru dan
membutuhkan rancangan clarifier dan bak pengolahan limbah
a. Clarifier berbentuk silinder dan kerucut dengan D=3,2H
b. Bak pengolahan limbah berbentuk balok

Hitung volume bak dan clarifier jika diketahui :

a. Diameter = 8 m
Debit air masuk = 800 m3 (NPM ganjil)
b. Diameter = 4 m
Debit air masuk = 700 m3 (NPM genap)
8. Hitung waktu Komputasi tiap program diatas?
9. Berikan kesimpulan pada praktikum ini ?
JAWABAN :

1. Clear all digunakan untuk menghapus nilai dari variabel yang ada sebelumnya,
jadi variabel telah digunakan sebelumnya dapat digunakan kembali dengan nilai
yang berbeda. Sedangkan clc digunakan untuk membersihkan layar command
window, sehingga ketika dirun yang muncul hanya hasil run program yang kita
buat.

2. Waktu komputasi adalah waktu yang digunakan untuk mengetahui berapa lama
program berjalan dari mulai program hingga program itu selesai. Ada 2 jenis
waktu komputasi, yaitu :
a. Tic toc, caranya adalah dengan menuliskan tic diawal program dan toc diakhir
program yang dibuat. Contoh :
clear all;
clc;
tic
a=3
b=5
c=a*b
toc
hasilnya :

b. Cputime, caranya adalah dengan menuliskan variabel apapun sama dengan

cputime dan menuliskannya di akhir program, sebagai contoh :
clear all;
clc;
 y=cputime;
a=3
b=5
c=a*b
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasilnya :
3. Program pembuatan larutan
clear all;
clc;
y=cputime;
disp(' PROGRAM PEMBUATAN LARUTAN');
disp(' ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^');
disp(' ');
disp('JENIS SENYAWA YANG DILARUTKAN SEBAGAI BERIKUT');
disp('1. PADATAN');
disp('2. CAIRAN ');
r=input('PILIH JENIS SENYAWA : ');
disp(' ');
switch r
case 1
disp('SENYAWA YANG DILARUTKAN SEBAGAI BERIKUT');
disp('1. KOH 4N 550 ml');
disp('2. KMnO4 5N 600 ml');
e=input('PILIH SENYAWA YANG INGIN DILARUTKAN : ');
disp(' ');
if e==1
disp('PEMBUATAN LARUTAN KOH 4N 550 ml');
disp('RUMUS YANG DIGUNAKAN :');
mr=56;
v=550/1000;
n=4;
e=1;
be=mr/e;
w=n*be*v;
disp('Be = Mr / e');
disp('Be = 56 / 1 = 56');
disp(' ');
disp('W = N x Be x v');
disp(' = 4 x 56 x 550/1000');
disp([' = ',num2str(w)]);
 disp(['JADI ',num2str(w),' gr KOH DILARUTKAN DENGAN
AQUADEST SAMPAI 550 mL']);
elseif e==2
disp('PEMBUATAN LARUTAN KMnO4 5N 600 ml');
disp('RUMUS YANG DIGUNAKAN : ');
mr=158;
v=600/1000;
n=5;
e=2;
be=mr/e;
w=n*be*v;
disp('Be = Mr / e');
disp('Be = 158 / 2 = 79');
disp(' ');
disp('W = N x Be x v');
disp(' = 5 x 79 x 600/1000');
disp([' = ',num2str(w)]);
disp(['JADI ',num2str(w),' gr KMnO4 DILARUTKAN DENGAN
AQUADEST SAMPAI 600 mL']);
end
case 2
disp('SENYAWA YANG DILARUTKAN SEBAGAI BERIKUT');
disp('1. NH4OH 3M 200 ml');
disp('2. C2H6O 60% 350 ml');
z=input('PILIH SENYAWA YANG INGIN DILARUTKAN : ');
disp(' ');
if z==1
disp('PEMBUATAN LARUTAN NH4OH 3M 200 ml');
disp('RUMUS YANG DIGUNAKAN :');
V2=200;
N2=3;
persen=25;
rho=0.91;
BM=35;
N1=(persen*1000*rho)/BM;
 V1=(V2*N2)/N1;
disp('N1 = (% x 1000 x p)/BM');
disp(' = (25 x 1000 x 0.91)/BM');
disp([' = ',num2str(N1)]);
disp(' ');
disp('V1 x N1 = V2 x N2');
disp('V1 = (V2 x N2)/N1');
disp(['V1 = (200 x 3)/',num2str(N1)]);
disp([' = ',num2str(V1)]);
disp(['JADI ',num2str(V1),' mL NH4OH DILARUTKAN DENGAN
AQUADEST SAMPAI 200 mL']);
elseif z==2
disp('PEMBUATAN LARUTAN C2H6O 60% 350 ml');
disp('RUMUS YANG DIGUNAKAN :');
persenv=60;
vp=350;
vt=(persenv*vp)/100;
disp('%Volume = (V terlarut / V pelarut) x 100%');
disp('V terlarut = (%Volume x V pelarut) / 100%');
disp(' = (25% x 350) / 100%');
disp([' = ',num2str(vt)]);
disp(['JADI ',num2str(vt),' mL C2H6O DILARUTKAN DENGAN
AQUADEST SAMPAI 350 mL']);
end
otherwise
disp('ERROR');
end
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program pembuatan larutan
4. A. program switch-case
clear all;
clc;
y=cputime;
disp(' SELAMAT DATANG');
disp(' DI ');
disp(' SPORTACO');
disp(' ');
disp('PERALATAN OLAHRAGA YANG DIJUAL : ');
disp('1. BOLA BASKET');
disp('2. SEPATU');
disp('3. RAKET TENNIS');
disp('4. JERSEY');
disp('5. BOLA TENNIS');
disp(' ');
disp('SILAHKAN CEK HARGA DENGAN MEMASUKAN ANGKA PILIHAN');
r=input(' ');
disp(' ');
switch r
case 1
disp('Rp 370.000,00');
case 2
disp('Rp 950.000,00');
case 3
disp('Rp 545.000,00');
case 4
disp('Rp 399.000,00');
case 5
disp('Rp 199.000,00 /pack');
otherwise
disp('TIDAK ADA');
end
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program switch-case
B. program else if
clear all;
clc;
y=cputime;
disp(' UNDIAN BERHADIAH');
disp(' DARI KOPI KAPAL KAYU');
disp(' ^^^^^^^^^^^^^^^^^^^^^^ ');
disp(' ');
m=input('masukan 3 digit nomor undian yang didapat = ');
disp(' ');
if m<=10
disp('maaf anda belum beruntung');
elseif m<=12
disp('selamat anda mendapatkan MACBOOK PRO');
disp('syarat dan ketentuan berlaku');
elseif m<=22
disp('maaf anda belum beruntung');
elseif m<=26
disp('selamat anda mendapat IPHONE 6');
disp('syarat dan ketentuan berlaku');
elseif m<=40
disp('maaf anda belum beruntung');
end
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run Program else if
C. Program switch case didalam switch case
clear all;
clc;
y=cputime;
disp(' WARUNG JAYA');
disp(' ^^^^^^^^^^^^^');
disp(' ');
disp('1. MINUMAN');
disp('2. MAKANAN');
r=input('PILIH MENU YANG DIINGINKAN : ');
disp(' ');
switch r
case 1
disp('1. KOPI HITAM');
disp('2. TEH HANGAT');
disp('3. ES SODA GEMBIRA');
e=input('PILIH MINUMAN YANG DIINGINKAN : ');
disp(' ');
switch e
case 1
disp('UANG YANG HARUS DIBAYAR Rp 4.000,00');
disp('MOHON TUNGGU PESANAN ANDA');
case 2
disp('UANG YANG HARUS DIBAYAR Rp 3.000,00');
disp('MOHON TUNGGU PESANAN ANDA');
case 3
disp('UANG YANG HARUS DIBAYAR Rp 8.000,00');
disp('MOHON TUNGGU PESANAN ANDA');
otherwise
disp('TIDAK ADA');
end
case 2
disp('1. NASI GORENG');
disp('2. RAWON');
disp('3. SOTO AYAM');
 z=input('PILIH MAKANAN YANG DIINGINKAN : ');
disp(' ');
switch z
case 1
disp('UANG YANG HARUS DIBAYAR Rp 12.000,00');
disp('MOHON TUNGGU PESANAN ANDA');
case 2
disp('UANG YANG HARUS DIBAYAR Rp 15.000,00');
disp('MOHON TUNGGU PESANAN ANDA');
case 3
disp('UANG YANG HARUS DIBAYAR Rp 13.000,00');
disp('MOHON TUNGGU PESANAN ANDA');
otherwise
disp('TIDAK ADA');
end
otherwise
disp('TIDAK TERSEDIA');
end
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program switch case didalam switch case
D. program else if didalam else if
clear all;
clc;
y=cputime;
disp(' SELAMAT DATANG');
disp(' ^^^^^^^^^^^^^^^^^^^^');
disp(' PEMBAGIAN KELAS');
disp('PROGRAM STUDI : TEKNIK KIMIA');
disp('SEMESTER : I');
disp('TANGGAL : 15 NOVEMBER 2016');
disp(' ');
mr=input('MASUKAN 3 DIGIT NOMOR BELAKANG NPM = ');
if mr<=200
if mr<=40
disp('RUANG : 302');
disp('PUKUL : 07.00');
disp('MATA KULIAH : KALKULUS');
elseif mr<=80
disp('RUANG : 305');
disp('PUKUL : 09.30');
disp('MATA KULIAH : KIMIA DASAR');
elseif mr<=120
disp('RUANG : 305');
disp('PUKUL : 07.00');
disp('MATA KULIAH : PANCASILA');
elseif mr<=160
disp('RUANG : 401');
disp('PUKUL : 08.40');
disp('MATA KULIAH : FISIKA DASAR');
elseif mr<=200
disp('RUANG : 303');
disp('PUKUL : 12.00');
disp('MATA KULIAH : PEMROGRAMAN KOMPUTER');
end
elseif mr
 disp('TIDAK TERDAFTAR');
end
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program else if didalam else if
E. program switch case didalam else if
clear all;
clc;
y=cputime;
disp(' SELAMAT DATANG');
disp(' ^^^^^^^^^^^^^^^^^^^^');
disp(' PEMBAGIAN KELAS');
disp('PROGRAM STUDI : TEKNIK KIMIA');
disp('SEMESTER : I');
disp('TANGGAL : 15 NOVEMBER 2016');
disp(' ');
mr=input('MASUKAN 3 DIGIT NOMOR BELAKANG NPM = ');
if mr<=200
switch mr<=40|mr<=80|mr<=120|mr<=160|mr<=200
case mr<=40
disp('RUANG : 302');
disp('PUKUL : 07.00');
disp('MATA KULIAH : KALKULUS');
case mr<=80
disp('RUANG : 305');
disp('PUKUL : 09.30');
disp('MATA KULIAH : KIMIA DASAR');
case mr<=120
disp('RUANG : 305');
disp('PUKUL : 07.00');
disp('MATA KULIAH : PANCASILA');
case mr<=160
disp('RUANG : 401');
disp('PUKUL : 08.40');
disp('MATA KULIAH : FISIKA DASAR');
case mr<=200
disp('RUANG : 303');
disp('PUKUL : 12.00');
disp('MATA KULIAH : PEMROGRAMAN KOMPUTER');
end
elseif mr
disp('TIDAK TERDAFTAR');
end
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program switch case didalam else if
F. Program Elseif didalam switch case
clear all;
clc;
y=cputime;
disp(' SELAMAT DATANG');
disp(' ^^^^^^^^^^^^^^^^^^^^');
disp(' PEMBAGIAN KELAS');
disp('PROGRAM STUDI : TEKNIK KIMIA');
disp('SEMESTER : I');
disp('TANGGAL : 15 NOVEMBER 2016');
disp(' ');
mr=input('MASUKAN 3 DIGIT NOMOR BELAKANG NPM = ');
switch mr<=200
case mr<=200
if mr<=40
disp('RUANG : 302');
disp('PUKUL : 07.00');
disp('MATA KULIAH : KALKULUS');
elseif mr<=80
disp('RUANG : 305');
disp('PUKUL : 09.30');
disp('MATA KULIAH : KIMIA DASAR');
elseif mr<=120
disp('RUANG : 305');
disp('PUKUL : 07.00');
disp('MATA KULIAH : PANCASILA');
elseif mr<=160
disp('RUANG : 401');
disp('PUKUL : 08.40');
disp('MATA KULIAH : FISIKA DASAR');
elseif mr<=200
disp('RUANG : 303');
disp('PUKUL : 12.00');
disp('MATA KULIAH : PEMROGRAMAN KOMPUTER');
end
 otherwise
disp('TIDAK TERDAFTAR');
end
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program Elseif didalam switch case
5.A. Program persamaan kuadrat 3𝑥 2 + 4𝑥 − 6 = 43
clear all;
clc;
y=cputime;
disp('persamaan 3x^2 + 4x - 6 = 43');
m=3;
r=4;
e=-49;
z=r+(sqrt(r^2-(4*m*e)))/2*m;
a=r-(sqrt(r^2-(4*m*e)))/2*m;
disp(['nilai x1 = ',num2str(z)]);
disp(['nilai x2 = ',num2str(a)]);
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program persamaan kuadrat 3𝑥 2 + 4𝑥 − 6 = 43
B. Program persamaan kuadrat 5𝑥 2 + 6𝑥 − 2 = 27
clear all;
clc;
y=cputime;
disp('persamaan 5x^2 + 6x - 2 = 27');
m=5;
r=6;
e=-29;
z=r+(sqrt(r^2-(4*m*e)))/2*m;
a=r-(sqrt(r^2-(4*m*e)))/2*m;
disp(['nilai x1 = ',num2str(z)]);
disp(['nilai x2 = ',num2str(a)]);
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program persamaan kuadrat 5𝑥 2 + 6𝑥 − 2 = 27
C. program akar √𝑥 − 27
clear all;
clc;
y=cputime;
disp('program akar sqrt(x-27)');
m=input('masukan nilai x = ');
r=sqrt(m-27);
disp(['hasil akarnya adalah ',num2str(r)]);
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program akar √𝑥 − 27
D. program akar √3𝑥 − 27
clear all;
clc;
y=cputime;
disp('program akar sqrt(3x-27)');
m=input('masukan nilai x = ');
r=sqrt((3*m)-27);
disp(['hasil akarnya adalah ',num2str(r)]);
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run Program akar √3𝑥 − 27
 3𝑥 2 8 4
E. Program persamaan kuadrat 5
+ 9 𝑥 − 26 = 6
clear all;
clc;
y=cputime;
disp('program persamaan kuadrat (3/5)x^2 + (8/9)x - 26 = 4/6');
m=3/5;
r=8/9;
e=-160/6;
z=r+(sqrt(r^2-(4*m*e)))/2*m;
a=r-(sqrt(r^2-(4*m*e)))/2*m;
disp(['nilai x1 = ',num2str(z)]);
disp(['nilai x2 = ',num2str(a)]);
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
 3𝑥 2 8 4
Hasil run Program persamaan kuadrat + 𝑥 − 26 =
5 9 6
6. program Penggolongan Gaji
clear all;
clc;
y=cputime;
disp(' GAJI PNS, TNI, DAN POLRI');
disp(' TAHUN 2016');
disp(' ');
disp('1. PNS');
disp('2. TNI');
disp('3. POLRI');
r=input('PILIH NOMOR PEKERJAAN ANDA : ');
disp(' ');
if r<=1
disp(' PNS');
disp(' ^^^^^^^');
e=input('ANDA TERMASUK GOLONGAN : ');
switch e
case 1
disp('GAJI ANDA Rp 2.500.000,010');
case 2
disp('GAJI ANDA Rp 3.500.000,00');
case 3
disp('GAJI ANDA Rp 4.500.000,00');
case 4
disp('GAJI ANDA Rp 5.500.000,00');
otherwise
disp('TIDAK ADA');
end
elseif r<=2
disp(' TNI');
disp(' ^^^^^^^');
z=input('ANDA TERMASUK GOLONGAN : ');
switch z
case 1
disp('TAMTAMA');
 disp('GAJI ANDA Rp 2.600.000,00');
case 2
disp('BINTARA');
disp('GAJI ANDA Rp 3.800.000,00');
case 3
disp('PERWIRA PERTAMA');
disp('GAJI ANDA Rp 4.500.000,00');
case 4
disp('PERWIRA TINGGI');
disp('GAJI ANDA Rp 5.600.000,00');
otherwise
disp('TIDAK ADA');
end
elseif r<=3
disp(' POLRI');
disp(' ^^^^^^^^^');
a=input('ANDA TERMASUK GOLONGAN : ');
switch a
case 1
disp('TAMTAMA');
disp('GAJI ANDA Rp 2.600.000,00');
case 2
disp('BINTARA');
disp('GAJI ANDA Rp 3.800.000,00');
case 3
disp('PERWIRA PERTAMA');
disp('GAJI ANDA Rp 4.500.000,00');
case 4
disp('PERWIRA TINGGI');
disp('GAJI ANDA Rp 5.600.000,00');
otherwise
disp('TIDAK ADA');
end
elseif r
disp('ERROR');
end
disp(' ');
z=cputime-y;
disp(['waktu komputasi = ',num2str(z),' sec']);
Hasil run program Penggolongan Gaji
7. Program perhitungan bak & clarifier
clear all;
clc;
tic
disp(' PERHITUNGAN DEBIT AIR DALAM BAK & CLARIFIER');
disp(' ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^');
disp(' ');
m=input('MASUKAN PANJANG BAK : ');
r=input('MASUKAN LEBAR BAK : ');
e=input('MASUKAN TINGGI BAK : ');
disp('DIAMETER CLARIFIER = 3.2H');
disp('DIAMETER CLARIFIER 4 m');
disp('DEBIT AIR MASUK 700 m3');
debit=700;
d=4;
z=d/3.2;
a=d/2;
i=(pi*a^2*z)+(1/3*pi*a^2*z)+(m*r*e);
f=i/debit;
disp(' ');
disp(['UNTUK MENGISI BAK DAN CLARIFIER BERVOLUME ',num2str(i),'
m3']);
disp(['DIBUTUHKAN WAKTU ',num2str(f),' sec']);
disp(' ');
toc
Hasil run program perhitungan bak & clarifier
8. Waktu komputasi sudah digunakan disetiap program.
9. Saya menyimpulkan bahwa Bahasa pemrograman Matlab ini terbilang lebih rumit
ketimbang Bahasa pemrograman lain, karena ketika menuliskan statement juga
harus memperhatikan huruf kapital yang digunakan. Namun dalam penulisan
program pemilihan kondisi di matlab lebih mudah daripada pascal.