Rabu, 27 Maret 2013

Tugas Komputasi 2


1. Tarif Surat Kabar

clear all
disp('Tarif Pemasangan Iklan Surat Kabar');
disp('**********************************');
disp ('(Minggu, Senin, Selasa, Rabu, Kamis dan Jumat, per baris Rp. 33.000,-');
disp (' Sabtu, per baris Rp. 40.000,-)');
disp(' ');
disp('Hari ke 1 = Minggu - Hari ke 2 = Senin - Hari ke 3 = Selasa');
disp('Hari ke 4 = Rabu - Hari ke 5 = Kamis - Hari ke 6 = Jumat - Hari ke 7 = Sabtu');
disp(' ');
hari = input('Pasang Iklan di Hari ke = ');
bar = input('Jumlah Baris yang Akan di Buat = ');
a = bar * 33000;
b = bar * 40000;
if hari == 1 || hari == 2 || hari == 3 || hari == 4 || hari == 5 || hari == 6;
    disp(['Total yang Harus di Bayar Adalah ', num2str(a)]);
elseif hari == 7
    disp(['Total yang Harus di Bayar Adalah ', num2str(b)]);
end

2. Tarif PDAM

clear all
disp ('Berikut ini adalah tarif pemakaian Air PDAM Kota Surabaya');
disp ('Jumlah Pemakaian (m3)    Harga/m3');
disp ('Pemakaian I      (     <  50 m3) Rp.  200,-');
disp ('Pemakaian II     (    51 – 150 ) Rp.  500,-');
disp ('Pemakaian III    ( 151 – 300 )   Rp.  1.000,-');
disp ('Pemakaian I V    ( >  300 m3 )   Rp.  1.500,-');
disp(' ');
tot = input('jumlah pemakaian = ');
p1 = 50 * 200;
p2 = 100 * 500;
p3 = 150 * 1000;
p4 = (tot - 300) * 1500;
p4i = tot-300;
jum = p1 + p2 + p3 + p4;
disp (['Jumlah Pemakaian = ', num2str(tot), 'm3']);
disp (['Pemakaian I     (<  50 m3)         Rp.   200,-  *   50  = Rp.', num2str(p1),',-']);
disp (['Pemakaian II    (51 -  150 m3)     Rp.   500,-  *   100 = Rp.', num2str(p2),',-']);
disp (['Pemakaian III   (151 -  300 m3)    Rp.   1000,- *   150 = Rp.', num2str(p3),',-']);
disp (['Pemakaian IV    ( >  300 m3)       Rp.   1500,- *   ', num2str(p4i),' = Rp.',num2str(p4),',-']);
disp (['Biaya Total                                             = Rp.', num2str(jum), ',-']);

3.  Nilai Pajak

clear all
disp('Rincian Pajak Penghasilan dan Besar Take Home Pay');
disp(' ');

peng = input('Besarnya Penghasilan = ');
p1= 0.05 * 25000000;
p2= 0.10 * 25000000;
p3= 0.15 * 50000000;
p4= 0.25 * 100000000;
p5= 0.35 * (peng-200000000);
a5=(peng-200000000);
jum=p1+p2+p3+p4+p5;
bay=peng-jum;

disp('5%      x     Rp 25000000     =   Rp  1250000');
disp('10%     x     Rp 25000000         =   Rp  2500000');
disp('15%     x     Rp 50000000         =   Rp  7500000');
disp('25%     x     Rp 100000000        =   Rp  25000000');
disp(['35%    x     Rp ',num2str(a5),'  =   Rp  ',num2str(p5)]);
disp(['Total                            =   Rp  ',num2str(jum)]);
disp(['Take Home Pay = ',num2str(peng),' – ',num2str(jum),' = Rp.  ',num2str(bay)]);
end

4. Konversi Nilai

clear all
t1=input('Masukkan Nilai Tugas 1 = ');
t2=input('Masukkan Nilai Tugas 2 = ');
t3=input('Masukkan Nilai Tugas 3 = ');
UTC=input('Masukkan Nilai UTC  = ');
UAC=input('Masukkan Nilai UAC = ');
rata=(t1+t2+t3)/3;
nil=((rata*0.3)+(UTC*0.3)+(UAC*0.4));

if nil > 80 && nil <= 100
disp('Nilai Anda Adalah A');
elseif nil > 70 && nil <= 80
disp('Nilai Anda Adalah AB');
elseif nil > 65 && nil <= 70
disp('Nilai Anda Adalah B');
elseif nil > 60 && nil <= 65
disp('Nilai Anda Adalah BC');
elseif nil > 55 && nil <= 60
disp('Nilai Anda Adalah C');
elseif nil > 40 && nil <= 55
disp('Nilai Anda Adalah D');
elseif nil > 0  && nil <= 40
disp('Nilai Anda Adalah E');
end

5. Tarif Bioskop
clear all
disp('Harga Tiket di Surabaya City');
disp('- Senin – Kamis       : Rp 15.000,-');
disp('- Jumat s/d Minggu    : Rp 35.000,-');
disp('- Hari Libur          : Rp 35.000,-');
disp('1 = Senin - 2 = Selasa - 3 = Rabu');
disp('4 = Kamis - 5 = Jumat - 6 = Sabtu - 7 = Minggu ');
disp('8 = Hari Libur - 9 = Bukan Hari Libur');
hari = input('Masukkan Kode Hari = ');
jum = input('Jumlah Tiket = ');
lib = input('Apakah Hari Libur = ');
a = jum * 15000;
b = jum * 35000;
if hari == 1 && lib ~= 8 || hari == 2 && lib ~= 8 || hari == 3 && lib ~= 8 || hari == 4 && lib ~= 8
    disp(['Total yang Harus di Bayar Adalah ', num2str(a)]);
elseif hari == 1 && lib == 8 || hari == 2 && lib == 8 || hari == 3 && lib == 8 || hari == 4 && lib == 8
    disp(['Total yang Harus di Bayar Adalah ', num2str(b)]);
elseif hari == 5 ||  hari == 6 || hari == 7
    disp(['Total yang Harus di Bayar Adalah ', num2str(b)]);
end

Tidak ada komentar:

Posting Komentar