Di dalam Pascal terdapat beberapa perintah pengulangan
(Looping), salah satunya adalah REPEAT….UNTIL…. dan FOR…DO atau FOR….DOWNTO…DO…
.
Contoh program dengan perintah REPEAT UNTIL :
Ketikkan
syntax berikut dibawah ini
Pada
program diatas dapat dilihat :
1.
Menggunakan USES CRT,
2.
Mendeklarasikan
variable I sebagai INTEGER,
3.
BEGIN, CLRSCR dan
variabel I diberi nilai 0,
4.
Memulai pengulangan
dengan REPEAT dengan statement (lihat
diatas)agar nilai I bertambah 1 setiap pengulangan,
5.
WRITE untuk
menampilkan nilai pada I,
6.
UNTIL untuk membatasi
pengulangan hingga nilai I = 10,
7.
READLN dan END untuk
mengakhiri program.
Outputnya
:
Contoh program dengan perintah FOR DOWNTO DO dan FOR TO DO
:
Ketikkan
syntax berikut dibawah ini
Pada
program diatas dapat dilihat :
1.
Menggunakan USES CRT,
2.
Mendeklarasikan
variable I, J, N, M, dan B sebagai INTEGER,
3.
BEGIN, CLRSCR dan WRITE
untuk menampilkan ‘MASUKKAN ANGKA : ’ , READLN(I); untuk membaca nilai yang
yang diberi oleh user dan diwakili dengan variable I,
4.
Memulai pengulangan
dengan FOR J sebagai pencacah, I pada baris ini sebagai batas atas pencacah dan
DOWNTO 1 sebagai batas bawah pencacah.
5.
BEGIN dan FOR N untuk
pengulangan N didalam proses pengulangan J,
6.
WRITE untuk
menampilkan nilai N,
7.
END; mengakhiri
pengulangan, READLN dan END untuk mengakhiri program.
Output dengan memasukkan angka 5 :
Contoh program Array :
Ketikkan
syntax berikut dibawah ini
Pada
program diatas dapat dilihat :
- Menggunakan USES CRT,
- NPM : ARRAY [1..20] OF STRING [8], berarti array NPM mempunyai 20 buah elemen yaitu dari 1 sampai 20 dengan tipe data string sebatas 8 karakter dst.,
- Variabel BANYAK untuk menentukan banyak data yang diinginkan User, dan variabel I sebagai variabel index dengan menggunakan pengulangan FOR I := TO BANYAK DO
- WRITE NPM, NAMA, NILAI, UMUR untuk menampilkan data apa saja yang akan dimasukkan oleh User , READLN untuk membaca nilai yang yang dimasukan oleh user dan diwakili dengan variabel masing – masing ditambah variabel indeks I,
- WRITELN untuk menampilkan kata NPM, NAMA, dst. dengan masing – masing spasi yang ditentukan (lihat diatas),
- FOR I dan WRITELN merupakan pengulangan yang kedua untuk menampilkan data yang sudah dimasukkan sebanyak data yang dimasukkan (I) oleh User,
- END; mengakhiri pengulangan, READLN dan END untuk mengakhiri program.Output
