Membuat Fungsi Switch dan Perhitungan Gauss Jordan di MATLAB

Langsung aja gan ini syntaks nya ......

disp('========================================================');
disp('                   Programmed By H421M                  ');
disp('========================================================');
disp(' ');
disp('Selamat Datang');
disp('Silahkan Pilih Perhitungan Yang diinginkan');
disp('1. Menghitung Intergal y(x)=x^2+3x^3');
disp('2. Rumus ABC (Aljabar)');
disp('3. Mencari akar dari 3 persamaan');
pilih=input('Masukan pilihan kamu 1-3 =');
disp(' ')
disp('========================================================');
switch pilih
    case 1
        disp('Diketahui y(x)=x^2+3x^3');
        disp('Kita cari Integral nya dengan batas yang kita inginkan');
        disp('Masukan Batas Integral');
        a=input('Batas Bawah =');
        b=input('Batas Atas =');
        y=inline('x.^2+3.*x.^3');
        hasil=quad(y,a,b);
        disp(['Jadi hasil nya adalah =',num2str(hasil)]);
    case 2
        disp('Mencari akar persamaan kuadrat');
        a=input('Masukan nilai a =');
        b=input('Masukan nilai b =');
        c=input('Masukan nilai c =');
        hasil1=((-1*b)+sqrt(b.^2-4.*a.*c))/(2.*a);
        hasil2=((-1*b)-sqrt(b.^2-4.*a.*c))/(2.*a);
        disp(['Jadi hasil akar yang pertama adalah =',num2str(hasil1)]);
        disp(['Jadi hasil akar yang kedua adalah =',num2str(hasil2)]);
    case 3
        disp('Mencari akar dari 3 persamaan');
        disp('Diketahui persamaan yang pertama adalah 3X1+5X2+7X3=15');
        disp('Diketahui persamaan yang pertama adalah 12X1+11X2+8X3=13');
        disp('Diketahui persamaan yang pertama adalah 14X1+X2+9X3=5');
        a=[3 5 7; 12 11 8; 14 1 9];
        b=[15;13;5];
        disp('Bentuk matriks dari persamaan');
        C=[a b]
        disp('Membuat nilai a11 menjadi 1');
        C(1,:) = C(1,:)/3
        disp('Membuat nol a21 dan a31');
        C(2,:) = C(2,:) - C(1,:)*12;
        C(3,:) = C(3,:) - C(1,:)*14
        disp('Membuat a22=1');
        C(2,:) = C(2,:)/(-9)
        disp('Membuat a32=0');
        C(3,:) = C(3,:) + C(2,:)*(22.3333)
        disp('Membuat a12=0');
        C(1,:) = C(1,:) - C(2,:)*1.6667
        disp('Membuat a33=1');
        C(3,:) = C(3,:) /  25.9629
        disp('Membuat a23=0');
        C(2,:) = C(2,:)  -  C(3,:) *  2.2222
        disp('Membuat a13=0');
        C(1,:) = C(1,:)  -  C(3,:) * -1.3704444
        C=(a\b);
        disp('Jadi nilai X1, X2, dan X3 adalah');
        disp(C);
    otherwise
disp(' ');
        disp('Pilihan nya salah mblo!!!!!!!!');
end
disp('========================================================');
disp('                       Terima Kasih                     ');
disp('        Add me Line : hzimo,IG:hzimo,Twitter:hzimo      ');
disp('========================================================');

Repost jangan lupa cantumin sumber ya gan.!!!!!!!!!!!!!!!!

Posting Komentar

0 Komentar