Monday, July 9, 2012

belajar turbo pascal 1

salam para pembaca kli ini saya akan menulis artikle belajar bahasa trubo pascal yuuk sama2 kita belajar

saya memakai turbo pascal terbaru versi 7.0

ini adalah contoh program serderhana
uses ...;
var ...;
begin
.... {Your program is here}
end

contoh
buka program turbo pascal anda
pilih file => new

ketik
Uses Crt;
Begin
clrscr;
writeln('saya sedang belajar pascal niii')
writeln('di rumah sendiri bersama om google')
end
  lihat gambar di bahwa ini




gimana mudah bukan coba klik menu run atau ctr + f9 jika tidak eror berati cara anda sudah benar
ok kita coba ambil kesimpulan pada program di atas.
siap secangkir kopi dan relax dolo agan & sistar
penjelasaan USES CRT
kata pada uses digunakan untuk memanggil unit library pascal.
Pada pascal ada beberapa unit bawaan/standar spt Dos, Crt, Graph, Graph3, Overlay, Printer, System, Turbo3, dan WinDos (ditambahkan pada Turbo Pascal 7).

Pada unit crt terdapat implementasi fungsi BIOS untuk screen (layar) dan interface keyboard.
Beberapa fungsi screen:
ClrEol, ClrScr, DelLine, GotoXY, dll.
Beberapa fungsi keyboar:
KeyPressed, dan ReadKey.

Namun sejak windows 98, fungsi unit crt sdh tdk kompatibel lagi. Sehingga semua program terpaksa dicompile ulang, dengan menggantikan unit crt menjadi unit wincrt.

penjelasan BEGIN untuk memulai menginput perintah pada pascal

Clrscr, adalah prosedur untuk membersihkan layar yang ada di dalam unit CRT, maka untuk dapat memakai Clrscr, unit Crt harus di ‘Uses‘ dalam deklarasi unit.  Uses Crt dan  Clrscr, merupakan pasangan dalam arti Clrscr adalah suatu prosedur PASCAL yang menghendaki dideklarasikannya unit namanya CRT, dengan cara Uses Crt.  Prosedur lain yang memerlukan unit Crt antara lain Gotoxy(x,y), DelLine, InsLine dan lain-lain yang akan dibahas kemudian.

writeln dimana kita menuliskan nama program kita
 end perintah bahwa program telah selesai................

bagaimana pusing... sama saya juga

ini ada penjelasan lengkapnya pelajari dengan pelan2 yang penting bisa ok yukkk simak bareng2

a. Nama Program
Untuk keperluan dokumentasi, suatu program dapat diberi nama.  Nama program ini bersifat optional (boleh ada boleh tidak).  Jika akan diberikan nama program, maka syntaknya sebagai berikut :
Syntax :
Program NamaProgram;
NamaProgram mempunyai ketentuan sebagai berikut :
o          Karakter pertama harus Abjad.
o          Karakter kedua dan seterusnya yang diijinkan adalah Abjad, Angka dan Garis Bawah ( _ ).
(aturan ini berlaku UMUM untuk : Nama Program, Nama ConstantaNama Type Data, Nama Variabel, Nama Fungsi dan  Nama Procedure)

b. Variable
Variabel adalah suatu “wadah data” yang harus dideklarasikan dibagian deklarasi variabel sebelum dipakai dalam program.  Inilah salah satu perbedaan pokok antara PASCAL dengan BASIC.  Di dalam BASIC kita dapat memakai sembarang nama variable tanpa pusing-pusing “memesan” dulu.  Tetapi di dalam PASCAL, variabel yang akan dipakai harus “dipesan” dulu dengan dideklarasikan dalam deklarasi variabel.
Syntax :
Var   NamaVariable :  TipeVariable;

Di dalam program selanjutnya variabel dapat diisi data, dengan cara ditugasi langsung atau dibaca dari keyboard.
Berikut adalah Type Variable dalam PASCAL yang dapat dipilih
Type Variable Kisaran Nilai Ukuran Memory (Byte)
Byte Word
ShortInt
Integer
LongInt
Real
0  …  255 0 … 65535
-128 … 127
-32768 … 32757
-2147483648 … 2147483648
1 E-38 … 1E+38
1 2
1
2
4
6
Single Double
Extended
1.5 E-45 … 1.5 E+45 5.0 E-324 … 5.0 E+308
1.9E-4951 … 1.1E+4932
4 8
10
Boolean Char
String
Kondisi TRUE, FALSE satu karakter ‘a’, ‘b’,…,’z’, ‘0’,’1’,…,’9’,’^’,dll
rangkaian karakter seperti hari :( ‘senin’, ‘selasa’ ,dst)
Array Record
File
Set
Pointer
Larik karakter , numerik atau demensi Numerik, string, char
Numerik, string, larik, record
Data ordinal
Alamat memori (menunjukkan letrak data di memori)

a. Type Data
Deklarasi Type Data dipakai apabila kita akan mendefinisikan suatu Type Data kita diluar Type Data standard PASCAL.
Cara mendeklarasikan adalah :
Type   NamaTypeData = TypeDataPASCAL;

b. Constanta
Konstanta adalah suatu nilai data yang bersifat tetap selama progarm dijalankan (“run time”). Konstanta dideklarasikan dengan cara :
Syntax :
Const   NamaKonstanta = NilaiData;
Yang harus diingat adalah bahwa antara nama konstanta dengan nilai data dipisahkan tanda  = (Sama Dengan).
c. Unit
Unit adalah suatu satuan kumpulan instruksi  yang harus diaktifkan jika instruksi yang bersangkutan akan dipakai. Di dalam PASCAL ada 4 unit yang sering dipakai yaitu CRT (berhubungan dengan perintah-perintah pengaturan layar), PRINTER (berhubungan dengan media cetak printer), DOS (berhubungan dengan perintah berkaitan dengan DOS) dan GRAPH (perintah-perintah grafik).
Sebagai contoh : Clrscr, adalah prosedur untuk membersihkan layar yang ada di dalam unit CRT, maka untuk dapat memakai Clrscr, unit Crt harus di ‘Uses‘ dalam deklarasi unit.  Uses Crt dan  Clrscr, merupakan pasangan dalam arti Clrscr adalah suatu prosedur PASCAL yang menghendaki dideklarasikannya unit namanya CRT, dengan cara Uses Crt.  Prosedur lain yang memerlukan unit Crt antara lain Gotoxy(x,y), DelLine, InsLine dan lain-lain yang akan dibahas kemudian.

d. Label
Label adalah suatu nama tertentu (dapat terdiri angka atau huruf atau kombinasinya), yang dalam program nanti akan dituju oleh statemen GOTO.  Namun dalam PASCAL sesungguhnya statement GOTO ini hanya diijinkan tetapi sama sekali TIDAK DIANJURKAN.  Karena statemen Goto menyebabkan struktur program menjadi tidak jelas.
e. Fungsi dan Procedure
Pemrograman PASCAL yang terstruktur menghendaki pemecahan masalah menjadi modul-modul yang lebih kecil.  Modul ini nanti dapat diimplementasikan melalui fungsi atau prosedur, sehingga program utama hanyalah bertugas mengelola pemanggilan fungsi dan prosedur yang sudah dideklarasikan.  Pada topik fungsi dan prosedur, deklarasi ini  akan dikupas lebih jauh.
h. Procedure Write dan Writeln
Procedure Write dan Writeln digunakan untuk mencetak suatu  konstanta, variable, ekspresi atau kombinasi dua atau ketiganya, dapat berupa konstanta string atau konstanta numerik.
Syntax :
Write(‘kontanta’, ‘ekspresi’, ‘variabel’)
Writeln(‘konstanta’, ‘ekspresi’, ‘variabel’)

Rangkaian karakter yang diapit tanda petik tunggal (‘ …..karakter …’)
Write :    akan mencetak dan  posisi kursor pada baris yang sama.
Writeln :    mencetak dan kursor akan turun satu baris, ke awal  baris.
Example 1:
Begin
Write(‘Halo ‘);
Write(‘  PASCAL’); Writeln;
Write(‘HALO’);
Write(‘   PASCAL’); Writeln;
Writeln(‘Halo’);
Writeln(‘PASCAL’);
Readln;
End.
Hasil Run :
Halo   PASCAL
HALO   PASCAL
Halo
PASCAL

h. Procedure Read dan Readln
Prosedur Read dan Readln adalah untuk membaca data DARI KEYBOARD dengan hasil pembacaan akan ditampung dalam variabel yang ada dalam argumen Read dan Readln tersebut.
Syntax :
Read(NamaVar1, NamaVar2, …);
Readln(NamaVar1, NamaVar2, …);

Tidak seperti Write atau Writeln dimana argumen (apa-apa yang ada dalam tanda kurung), dapat terdiri dari konstanta, variabel atau ekspresi, maka argumen Read atau Readln hanya dapat berupa Variable-Variable yang dapat satu atau lebih, yang sudah dideklarasikan dalam deklarasi variable.  Data yang masuk haruslah sesuai dengan Type Variable yang bersangkutan.
Example 2:
{file  : P12.Pas
Nama         : Yuni   01.05.2000
Tara   01.05.2005
Hari/tgl/jam : Selasa, 10 01 01, 11.00
Kelp./passw  : SL2-F/22F
Ass          : Winnie}

Program menghitung_bilangan;
Uses Crt;;
Var
A,B,C : integer;
P,Q   : real;
Z     : string;

Begin
Clrscr;
A := 4; B:= 5; C:=A*B;
Z:= ‘SMKPGRI1NGAWI’;
Writeln(A,B,C);
Writeln(‘ISI Z = ’,Z);
Readln
End.
Hasil Run:
4520
ISI Z = SMKPGRI1NGAWI

Example:
{file : P12A.Pas
Nama         : Yuni   02.05.2000
Tara   02.05.2005
Hari/tgl/jam : Selasa, 01 10 02, 11.00
Kelp./passw  : SL2/22F
Ass          : Winnie}

Program menghitung_bilangan;
Uses Crt;
Var
A,B,C : integer;
P,Q   : real;
Z     : string;

Begin
Clrscr;
A := 4; B:= 5; C:=A*B;
Z:=’SMKPGRI1NGAWI’;
Writeln(‘A=’,A:5, ‘B=’,B:5, ‘C=’,C:5);
Writeln(‘ISI Z=’,Z:10);
Readln;
End.
penjelasin saya copy paste dari blog sebelah ni linknya article originnya


Friday, July 6, 2012

menikmaati sudut batam

salam para pembaca udah lama saya enggak posting di karenakan sibuk, ........di hari yang cerah dan indah ini
saya akan mengajak anda ke sudut kota batam
bagi anda para pembaca mungkin sudah ada yang pernah pernah ke batam atau yang belum pernah ke batam,  yuuuk kita jelajahi batam. saya akan mencoba memaparkan kota batam dengan versi saya sendiri. ok tanpa basa basi lagi yuuk cekidot....
seperti yang anda lihat gambar di atas gimna ? begitu asli dan alami bersih tanpa sampah. saya berharap pemandang seperti ini semoga kita bisa melestarikan untuk anak cucu  anak cucu kita di masa yang akan datang (amiien) lokasi pantai berada di batu besar dekat kampung tengah berjarak dekat dengan pantai sekilak.....

ini hasil cempreetan kamera ku
pohon tua

.di sini kita bisa menikmaati pemandang yg natural dan alami udara yang segar sangat cocok menyegarkan pikiran kita. saat pertama kali nya saya berkunjung kesini, saya sangat mengagumi pemandangan ini, perasaan saya sangat damai dan tenang semua masalah  beban di pikiran menghilang berlahan 2







jadi tempat ini bisa menjadi alternatif bagi anda yang ingat menikmati pemandang natural.tempat ini menurut saya mempunyai potensi dijadikan tempat wisata ok...sampai di sini entr kita bersambung ketempat lain