Sabtu, 24 November 2012

Praktikum Aplikasi Komputer (IF -ELSEIF- END)



  1. Buatlah Program untuk mencari penyelesaian Sistem Persamaan Linear dengan Matriks dari teori yang sudah anda ketahui.
·Jumlah persamaan = jumlah Variabel
·Jumlah persamaan < jumlah Variabel
·Jumlah persamaan >jumlah Variabel

MATLAB - FILE - NEW - SCRIPT
Editor M-FILE
disp('Program untuk menyelesaikan SPL Ax=b')
matriks_A=input('masukkan matriks A= ');
disp('ukuran matriks A adalah :')
baris_A=size(matriks_A,1)
kolom_A=size(matriks_A,2)
matriks_b=input('masukkan matriks b= ')
disp('ukuran matriks b adalah :')
baris_b=size(matriks_b,1)
kolom_b=size(matriks_b,2)
% Matriks bujur sangkar
if baris_A==kolom_A
    x=inv(matriks_A)*matriks_b
   disp('Maka matriks x adalah :')
    disp(x)
% Jumlah persamaan lebih besar atau sama dengan jumlah variabel
elseif baris_A>=kolom_A;
    x=matriks_A\matriks_b;
    disp('Maka matriks x adalah :')
    disp(x)
% Jumlah persamaan lebih kecil dari jumlah variabel
elseif baris_A<kolom_A;
    x=pinv(matriks_A)*matriks_b;
    disp('Maka matriks x adalah :')
    disp(x)
end

disave dengan nama SPL, kemudian set path.

  Command windows

>> SPL
Program untuk menyelesaikan SPL Ax=b
masukkan matriks A= [1 -1 2;1 1 -2;-1 -3 1]
ukuran matriks A adalah :
baris_A =
    3
kolom_A =
     3
masukkan matriks b= [1;2;-2]
matriks_b =
     1
     2
    -2
ukuran matriks b adalah :
baris_b =
     3

kolom_b =
     1
x =
    1.5000
    0.1000
   -0.2000
Maka matriks x adalah :
    1.5000
    0.1000
   -0.2000

2.    Input : Dibaca tiga buah harga a, b dan c
Output :harus dituliskan secara terurut mulai dari yang terkecil sampai dengan yang terbesar. Ketiga bilangan yang dibaca selalu berlainan harganya
Buka Matlab-New-Script
Editor
a=input('berapa nilai a =')
b=input('berapa nilai b=')
c=input('berapa nilai c=')
if (a<b)&(b<c)
    d=[a b c]
    disp('urutan angka dr yg terkecil =')
    disp(d)
elseif (a<c)&(c<b)
    d=[a c b]
    disp('urutan angka dr yg terkecil =')
    disp(d)
elseif (b<a)&(a<c)
    d=[b a c]
    disp('urutan angka dr yg terkecil =')
    disp(d)
elseif (b<c)&(c<a)
    d=[b c a]
    disp('urutan angka dr yg terkecil =')
    disp(d)
elseif (c<a)&(a<b)
    d=[c a b]
    disp('urutan angka dr yg terkecil =')
    disp(d)
elseif (c<b)&(b<a)
    d=[c b a]
    disp('urutan angka dr yg terkecil =')
    disp(d)
elseif (a==b)|(a==c)|(b==c)|(a==b==c)
    disp('nilai a,b,c tidak boleh sama')
end
disimpan dgn nama Yunidha.m, kemudian seth path
di jendella command windows
>> Yunidha
berapa nilai a =3
a =
     3
berapa nilai b=5
b =
     5
berapa nilai c=1
c =
     1
d =
     1     3     5
urutan angka dr yg terkecil =
     1     3     5

Contoh yang salah
>> Yunidha
berapa nilai a =3
a =
     3
berapa nilai b=3
b =
     3
berapa nilai c=3
c =
     3
nilai a,b,c tidak boleh sama

Tidak ada komentar:

Posting Komentar