Page 26 - Bahan Ajar Algoritma dan Pemrograman
P. 26
©MathUNG 2016
%Nama File :luas_bangun_datar.m
disp('Pilih salah satu program..');
disp('1. menghitung luas bujur sangkar: ');
disp('2. menghitung luas persegi panjang: ');
disp('3. menghitung luas lingkaran: ');
pilih=input('Anda ingin menghitung luas 1,2 atau 3 ? \n');
switch pilih
case 1
a=input('masukkan panjang sisi bujur sangkar:');
luas=a*a;
fprintf('Luas bujur sangkar adalah %f \n',luas);
case 2
a=input('masukkan panjang persegi panjang: ');
b=input('masukkan lebar persegi panjang: ');
luas=a*b;
fprintf('Luas persegi panjang adalah %f \n',luas);
case 3
r=input('masukkan jari-jari lingkaran :');
luas=3.14 * power(r,2);
fprintf('Luas lingkaran adalah %f \n',luas);
otherwise
fprintf('Hanya ada pilihan 1,2 atau 3.Ulangi...! \n')
end
Simpan kemudian jalankan pada command window ,
>> luas_bangun_datar
Pilih salah satu program..
1. menghitung luas bujur sangkar:
2. menghitung luas persegi panjang:
3. menghitung luas lingkaran:
Anda ingin menghitung luas 1,2 atau 3 ?
1
masukkan panjang sisi bujur sangkar:6
Luas bujur sangkar adalah 36.000000
>> luas_bangun_datar
Pilih salah satu program..
1. menghitung luas bujur sangkar:
2. menghitung luas persegi panjang:
3. menghitung luas lingkaran:
Anda ingin menghitung luas 1,2 atau 3 ?
2
masukkan panjang persegi panjang: 4
masukkan lebar persegi panjang: 5
Luas persegi panjang adalah 20.000000
>> luas_bangun_datar
Pilih salah satu program..
1. menghitung luas bujur sangkar:
Resmawan | 64 Jurusan Matematika FMIPA UNG