Jumat, 11 April 2014

Simulasi Luas dan Keliling Bangun Datar Menggunakan Matlab - Switch - Case

clc;clear all;
disp('========================================');
disp('Program  : Luas dan Keliling Bangun Datar');
disp('Programer: Syaharuddin');
disp('========================================');
disp('Daftar Pilihan:');
disp('1. Persegi');
disp('2. Persegi Panjang');
disp('3. Segitiga Siku-siku');
disp('4. Segitiga Sama Sisi');
disp('5. Segitiga Sembarang');
disp('6. Trapesium');
disp('7. Layang-layang');
disp('8. Belah Ketupat');
disp('9. Lingkaran');
disp('========================================');
p=input('Pilihan = ');
disp('========================================');
switch p
    case 1
        s=input('Sisi = ');
        L=s*s;
        K=4*s;
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

    case 2
        p=input('Panjang = ');
        l=input('Lebar = ');
        L=p*l;
        K=2*(p+l);
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

    case 3
        a=input('Alas = ');
        t=input('Tinggi = ');
        m=sqrt(a^2+t^2);
        disp(['Sisi Miring = ',num2str(m)]);
        L=0.5*a*t;
        K=a+t+m;
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

    case 4
        s=input('Sisi = ');
        t=sqrt(s^2-(0.5*s)^2);
        disp(['Tinggi = ',num2str(t)]);
        L=0.5*s*t;
        K=3*s;
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

    case 5
        a=input('Sisi a = ');
        b=input('Sisi b = ');
        c=input('Sisi c = ');
        K=a+b+c;
        s=K/2;
        L=sqrt(s*(s-a)*(s-b)*(s-c));
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

    case 6
        a=input('Sisi Alas = ');
        b=input('Sisi Atas = ');
        m=input('Sisi Miring = ');
        t=sqrt(m^2-((a-b)/2)^2);
        disp(['Tinggi = ',num2str(t)]);
        K=a+b+2*m;
        L=0.5*t*(a+b);
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

    case 7
        s1=input('Sisi 1 = ');
        s2=input('Sisi 2 = ');
        d1=input('Diagonal 1 = ');
        d2=input('Diagonal 2 = ');
        K=2*(s1+s2);
        L=0.5*d1*d2;
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

    case 8
        s=input('Sisi = ');
        d1=input('Diagonal 1 = ');
        d2=input('Diagonal 2 = ');
        K=4*s;
        L=0.5*d1*d2;
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

    case 9
        r=input('Jari-jari = ');
        L=(22/7)*r^2;
        K=2*(22/7)*r;
        disp(['L = ',num2str(L)]);
        disp(['K = ',num2str(K)]);
disp('========================================');

end

Reaksi:

0 komentar:

Poskan Komentar

Catatan Kuliah

Syaharuddin Al Musthafa