Monday, November 11, 2013

Statemen Turbo Pascal


Statemen adalah perintah untuk pengerjaan programpascal. Statemen terletak dibagian
deklarasi statemen dengan diawali oleh katacadangan BEGIN dan diakhiri dengan kata
cadangan END. Akhir dari setiap statemen diakhiri dengan titik koma [;]. Statemen
statemen dalambahasa Pascal terdiri dari pernyataan yang berupa fungsi dan prosedur
yang telah disediakan sebagai perintah standar Turbo Pascal.
1. Statemen-statemen yang digunakan untuk input/output.
# Read/Readln [prosedur].
Perintah ini digunakan untuk memasukkan [input] data lewat keyboard ke
dalamsuatu variabel.
Sintaks: Read/Readln(x); (ingat, selalu diakhiri dengan titik koma [;])
Keterangan : x = variabel.
Read = pada statemenini posisi kursor tidak
pindah ke baris selanjutnya.
Readln = pada statemen ini posisi kursor akan
pindah ke baris selanjutnya setelah di
input.
# ReadKey [fungsi].
Untuk pembacaan sebuah karakter dari keyboard. Tipe data
yang dihasilkan adalah char.
Sintaks: ReadKey;
# Write/Writeln [prosedur].
Digunakan untuk menampilkan isi dari suatu nilai variable di
layar.
Sintaks: Write/Writeln(x);

Keterangan : x = variabel.
Write/Writeln= statement ini digunakan untuk mencetak variable
ke dalammonitor
Contoh :
Programinput;
Uses Crt;
Var nm: String;
npm : String;
Begin
Clrscr;
Writeln  ('masukkan namadan NPM ');
Writeln  ('------------------------------');
Write  ('namaanda : ');
Readln  (nm);
Writeln  ('NPM anda : ');
Readln  (npm);
End.
Bila dijalankan hasilnya adalah:
masukkan namadan NPM
------------------------------
namaanda : ( di input )
NPM anda : ( di input )

2. Statemen-statemen yang digunakan untuk pengaturan letak layar.
# ClrScr [prosedur].
Perintah ini digunakan untuk membersihkan layar.
sintaks: ClrScr;  Æ[Clear screen]
# GotoXY[prosedur].
Untuk menempatkan posisi kursor pada layar.
Sintaks: GotoXY(X, Y: Byte);
Keterangan : X = sumbu X (posisi horisontal)
Y = sumbu Y (posisi vertikal)
# DelLine [prosedur].
Untuk menghapus sebuah baris pada posisikursor dan menaikkan
baris-baris dibawahnya.
Sintaks: DelLine;
# InsLine [prosedur].
Untuk menyisipkan sebuah baris pada posisi kursor dan meng-
geser kebawah tampilan-tampilan baris dibawahnya.
# Delay [prosedur].
Untuk menghentikan sejenak proses program.
Sintaks: Delay (MS: Word);
Keterangan : variable MS = ukuran waktu dalammilisecond.
Contoh :
ProgramLayar;
Uses Crt;
Var x : Char;
Begin
ClrScr;
GotoXY(35,10);Writeln  (‘I Love Dinda');
Write        (tunggu sebentar...!!');
Delay (5000);
InsLine;
GotoXY (35,11);Writeln  ('Bayi sehatku');
GotoXY(01,13);Writeln  ('Tekan Enter !');
Delay(1000);
GotoXY(15,12);
DelLine;
Read(x);
End.
Hasilnya adalah :
I Love Dinda
Bayi sehatku
tunggu sebentar...!!
Tekan Enter !


0 comments:

Post a Comment

Followers

English French German Spain Italian Dutch Russian Portuguese Japanese Korean Arabic Chinese Simplified


  © Blogger template 'A Click Apart' by Ourblogtemplates.com 2008

Back to TOP