Mesran

Hanya ingin berbagi kebaikan dan mendapatkan kebaikan yang lain.

Tahapan : Input Proses Output dalam PASCAL

Contoh Program Sederhana :

USES CRT ;
VAR
Nama : String[20] ;
Harga : Longint ;
Jumlah : Byte ;
Total : Longint ;

BEGIN
TextColor(14) ; TextBackGround(1) ;
CLRSCR ;

{ Bagian INPUT }
Write ( ' Nama Barang  : ' ) ; Readln ( Nama ) ;
Write ( ' Harga  : ' ) ; Readln ( Harga ) ;
Write ( ' Jumlah : ' ) ; Readln ( Jumlah ) ;

{ Bagian PROSES }
Total := Harga * Jumlah ;

{ Bagian OUTPUT }
TextColor(14+128) ;
Writeln ( ' Total Harga : ' , Total ) ;

Readln ;
END.

Penjelasan :
Program biasanya tidak terlepas dari IPO : yaitu Input Proses Output
Input : bertujuan untuk memasukkan data yang kelak akan di proses

Proses : bertujuan untuk memproses data masukkan yang kelak hasilnya untuk di tampilkan

Output : bertujuan menginformasikan kepada User hasil dari pengolahan yang telah di lakukan.

NAH pada bagian program diatas pada intinya Logika nya yaitu :

Inputkan Harga
Inputkan Jumlah
Proses Total = Harga * Jumlah
Outputkan Total

Oke lebih di sederhanakan kembali : Total = Harga * Jumlah
Mungkin itu yang tepat untuk menyatakan program di atas.

Nah, coba kita bahas yang lain :
ada Rumus A = 4 * 3 + B
nah perhatikan berapa variabel yang di butuhkan ? Tepat : cuma 2 variabel yaitu A dan B. maka harus di pesan di bagian VAR yaitu :

VAR
B : Byte ; begitu juga untuk A
A : Byte ;

nah selanjutnya yang harus anda cari yaitu mana variabel INPUT dan mana Variabel PROSES.
untuk yang lebih simple yaitu Variabel Input yaitu variabel yang di butuhkan oleh variabel lain. pada kasus di atas A = 4 * 3 + B untuk nilai B belum tahu berapa nilainya. sedangkan 4 & 3 yah emang itu nilainya jadi nggak perlu input.
jadi :
kita harus menggunakan READLN ( B ) ; untuk menginputkan nilai B.

nah JIKA telah menginputkan B misalnya nilai : 5 maka rumus seharusnya menjadi A = 4 * 3 + 5.
jadi mana yang lebih dahulu di buat ? INPUT atau PROSES, pass sekali tentu INPUT dong sehingga program menjadi :

VAR
B : Byte ;
A : Byte ;

BEGIN
READLN ( B ) ;
A := 4 * 3 + B ;

END.

tinggal bagaimana USER bisa tahu informasi berapa nilai A ? maka kita harus menampilkan nilai variabel A yaitu WRITELN ( A ) ;

jadi program menjadi :

VAR
B : Byte ;
A : Byte ;

BEGIN
READLN ( B ) ;
A := 4 * 3 + B ;
WRITE ( A ) ;
END.

kalau program di atas di jalankan maka bisa mendapatkan hasil berikut ini :

4 –> ini di inputkan
19 –> ini hasil dari proses

NAH, masa cuma muncul angka angka seperti itu, 4 dan 19 emang angka togel apa….maka kita harus membaguskan tampilan OUTPUT tersebut menjadi

WRITE ( ‘ NILAI B : ‘ ) ; READLN ( B ) ;

dan

WRITE ( ‘ NILAI A : ‘ ) ; WRITE ( A ) ;
tapi biasanya disingkat
WRITE ( ‘ NILAI A : ‘ , A ) ;

nah sudah paham penggunaan perintah WRITE itu untuk apa, tepat hanya untuk menampilkan hasil atau sebagai User Interface saja, agar Program kita itu lebih mudah di pahami.

Oke, Mungkin ada pertanyaan pada Bagian INPUT PROSES dan OUTPUT.

Filed under: Pemrograman Pascal,

Terima kasih telah memberikan komentar anda.

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

Archives Per Tahun

Sponsored

C&C Online Shop

Blog Stats

  • 355,909 sejak 12 Jan 2011

User’s Online


My Music

Enter your email address to follow this blog and receive notifications of new posts by email.

Join 223 other followers

January 2011
M T W T F S S
    Feb »
 12
3456789
10111213141516
17181920212223
24252627282930
31  
%d bloggers like this: