Tugas 3

Tugas	Tgl Tugas	Tgl Selesai
3	25 Maret 2010	2 Juni 2010

Nama	NPM	TUGAS
Ridho Audli	0815031087	Mengatur dan membuat blog
Arif Wicaksono	0815031039	Mencari data
Fajar Ardian	0855031013	Mencari data dan edit blog
Adam Hussein	0855031001	Mencari data
Ade Wahyu H.	0815031033	Mencari data

TUGAS 3

Buat program JST, untuk memprediksi suatu perkembangan

% program pencarian jumlah penggunaan motor

% Oleh : AI-A-RAFAA
% Anggota :
% Ridho Audli (0815031087)
% Ade Wahyu Hidayat ( 0815031033)
% Fajar Ardian ( 0855031013)
% Arif Wicaksono (0815031039 )
% Adam Hussein ( 0855031001 )
%--------------------------------------------------

disp('----------------------------------');
disp('Program prediksi banyaknya penggunaan motor’);
disp('---------------------------------');



clear all;
clc;

%jumlah penduduk Lampung pertahun
t2003=6852999;
t2004=6915950;
t2005=7116177;
t2006=7211586;
t2007=7289767;
t2008=7302486;
t2009=7310439;


%jumlah konsumsi motor pertahun dalam MW
r2003=317;
r2004=326;
r2005=331;
r2006=338;
r2007=363;
r2008=376;
r2009=382;

%jumlah motor diproduksi pertahun
r2003=1000;
r2004=1000;
r2005=1000;
r2006=1000;
r2007=1000;
r2008=1000;
r2009=1000;

%jumlah motor yang rusak pertahun
r2003=52;
r2004=42;
r2005=67;
r2006=100;
r2007=87;
r2008=150;
r2009=77;

th=input('tahun berapa yang akan diprediksi = ');
%p=input ('jumlah penduduk sebelumnya =');
%c=input('jumlah motor diproduksi=');
%d=input('jumlah motor rusak='};
mw=(((th-2003)*200000)+6852999)*(326/6915950);
disp(['jumlah k motor dalam MW = ' num2str(mw)]);