Warung Online

February 28, 2012

LOOPING DAN ARRAY PADA PASCAL

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 :
  1. Menggunakan USES CRT,
  2. 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.,
  3. Variabel BANYAK untuk menentukan banyak data yang diinginkan User, dan variabel I sebagai variabel index dengan menggunakan pengulangan FOR I := TO BANYAK DO
  4. 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, 
  5. WRITELN untuk menampilkan kata NPM, NAMA, dst. dengan masing – masing spasi yang ditentukan (lihat diatas),
  6. FOR I dan WRITELN merupakan pengulangan yang kedua untuk menampilkan data yang sudah dimasukkan sebanyak data yang dimasukkan (I) oleh User,
  7. END; mengakhiri pengulangan, READLN dan END untuk mengakhiri program.Output 
Dengan BANYAK DATA = 1 :