Perulangan

Pengulangan (loop) merupakan bentuk yang sering ditemui di dalam suatu program aplikasi. Di dalam bahasa Pascal, dikenal tiga macam perulangan, yaitu dengan menggunakan pernyataan For, While-Do, dan Repeat…Until.

1. Struktur Perulangan For
   
   
   Perulangan dengan pernyataan For digunakan untuk mengulang pernyataan atau satu blok pernyataan berulang kali sejumlah yang ditentukan. Perulangan dengan pernyataan For dapat berbentuk perulangan positif, perulangan negatif dan perulangan tersarang.
   
   
   Program 1.
   
   
   Var
      I:Integer;
   Begin
      For I:= 1 to 5 Do Writeln(‘Pascal’);
   End. 
   
   
2. Struktur Perulangan While-Do
   
   Perulangan ini menggunakan pernyataan While-Do. Pernyataan While-Do digunakan untuk melakukan proses perulangan suatu pernyataan atau blok pernyataan terus-menerus selama kondisi ungkapan logika pada While masih bernilai logika benar
   
   program 2.
   
   
   

   Var
        I:Integer;
   Begin
        I:=0;
        While I<5 Do
        Begin
             Writeln(I);
             I:=I+1;
        End; End. 
   
3. Struktur Repeat…Until
   Struktur Repeat…Until digunakan untuk mengulang pernyataan-pernyataan atau blok pernyataan sampai kondisi yang diseleksi di Until tidak terpenuhi.
   Contoh:
   

   Var 
        I:Integer 

   Begin 

        I:=0; 

        Repeat 

              I:=I+1; 

              Writeln(I); 

        Until I=5; 

   End.