Perhitungan Volume Kubus, Silinder, Balok dan Kerucut Menggunakan Switch Case

Input :

clear all;
clc;
disp ('-----------------------------------------------------------------');
disp ('>>>>>>>>>>>>>>Perhitungan Volume Bidang Geometri<<<<<<<<<<<<<<<<<');
disp ('-----------------------------------------------------------------');
disp ('Pilihan Jenis Bidang Gepmetri yang anda pilih :')
disp ('1. Kubus')
disp ('2. Silinder')
disp ('3. Balok')
disp ('4. Kerucut')
pilih=input('pilihan anda --> ketik(1/2/3/4)-->');
switch pilih
    case 1
      disp ('--------------Perhitungan Volume Kubus--------------')
      s=input('Data Sisi(m)=');
      Volume=s^3;
      disp(['Perhitungan Volume Kubus=' num2str(Volume) 'm2']);
    case 2
      disp ('>>>>>>> Program Volume Silinder <<<<<<<<<');
      disp('---------------------------------------');
      r=input('Data Jari-jari (m)=');
      t= input('Data Tinggi (m)=');
      LA=pi*r^2;
      V=LA*t;
      disp(['Volume=' num2str(V) 'm']);
    case 3
      disp ('--------------Perhitungan Volume Balok--------------')
      pjg=input('Data Panjang(m)=');
      lbr=input('Data Lebar(m)=');
      tg=input('Data Tinggi(m)=');
      Volume=pjg*lbr*tg;
      disp(['Perhitungan Volume Balok=' num2str(Volume) 'm2']);
    case 4
      disp ('>>>>>>> Perhitungan Volume Kerucut <<<<<<<<<');
      disp('---------------------------------------');
      r=input('Data Jari-jari (m)=');
      t= input('Data Tinggi (m)=');
      LA=pi*r^2;
      V=1/3*LA*t;
      disp(['Volume=' num2str(V) 'm']);
    otherwise
      disp ('zonk');
end;
disp('-----------------------------------------------------------------')
disp('Apakah anda akan mengulangi perhitungan?');
disp('1. ya');
disp('2. tidak')
pilih=input('ketik pilihan anda (1 atau 2)');
switch pilih
    case 1
        run D:Volume_Bidang.m
    case 2
        disp('program selesai');
    otherwise
        disp('zonk');
end;


Outputnya akan seperti ini :


Jika ada pertanyaan bisa komen di bawah :)

0 comments:

Post a Comment

 
Ary Sukma Putra © 2013. All Rights Reserved. Powered by Blogger
Top