TAG PROGRAM FOR DO DALAM PASCAL

FOR . . . DO

Perintah For . . . Do digunakan untuk melakukan perulangan determinitif.  Artinya sebuah pernyataan (tunggal atau majemuk) akan dikerjakan secara berulang-ulang sebanyak n kali, dimana n adalah sebuah bilangan yang telah diketahui sebelumnya.

Syntax 1 :

For NamaVarCounter := Awal To Akhir Do

Statement;

Syntax 2 :

For NamaVarCounter := Awal To Akhir Do

Begin

Statement1;

Statement2;     Block Statement

………;

End;

Syntax 3 :

For NamaVarCounter := Awal DownTo Akhir Do

Statement;

Syntax 4 :

For NamaVarCounter := Awal DownTo Akhir Do

Begin

Statement1;

Statement2;     Block Statement

………;

End;

Jika Awal lebih kecil dari Akhir digunakan perintah To, sedangkan jika Awal lebih besar dari Akhir digunakan perintah DownTo.

Contoh:

Program CetakChar;

Uses Crt;

Var

Awal, Akhir, Karak : Char;

Begin

Clrscr;

Write(‘Karakter Awal  : ’);Readln(Awal);

Write(‘Karakter Akhir : ’);Readln(Akhir);

Writeln;

Write(‘Naik  : ’);

For Karak := Awal To Akhir Do

Write(Karak);

Writeln;

Write(‘Turun : ’);

For Karak := Akhir DownTo Awal Do

Write(Karak);

Readln;

End.

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s