Dalam menuliskan bahasa pemrograman, terkadang kita ingin menuliskan perintah yang sama dalam banyak kali iterasi misalnya ratusan, ribuan bahkan juta-an. Tentunya itu akan membutuhkan waktu dan tenaga yang lama untuk menuliskan satu persatu perintah tersebut.

Maka dari itu, dalam bahasa pascal ada sebuah fungsi bernama perulangan (looping). Looping ( atau perulangan ) sendiri didefinisikan sebagai bahasa pemrograman yang berfungsi untuk menjalankan baris kode secara berulang-ulang selama kondisi masih terpenuhi.

3 Macam Algoritma Perulangan Beserta Contoh Programnya

Ternyata ada 3 macam Looping dalam Algoritma Perulangan. Untungnya, ketiga algoritma ini akan dibahas secara rinci oleh Dafunda Tekno

1. Algoritma Perulangan For

Algorimta pengulangan for dibagi menjadi dua yaitu For. . . to . . . do untuk perulangan postif dan For . . . down. . . to untuk perulangan negatif. Atau lebih jelas, kamu bisa lihat dua pembagian algoritam pengulangan berikut ini.

A. Algoritma Perulangan For…to..do

Algoritma For . . to. . .do ini melakukan perulangan secara berurutan dari angka terkecil hingga angka terbesar. Algoritma ini memiliki struktur seperti ini

For variabel:=kondisiAwal to kondisiAkhir do statemen;

Contoh program pascal algoritma perulangan for . . . to . . . do

Program Loop1;
uses crt;
var i:integer;
Begin
   For i:=1 to 100 do
   Begin
      writeln('Nama Saya');
   End;
   Readln;
end.

B. Algoritma Perulangan For…downto..do

Algoritma For . . to. . .do ini melakukan perulangan secara berurutan dari angka terbesar hingga angka terkecil. Algoritma ini memiliki struktur seperti ini

For variabel:=kondisiAwal downto kondisiAkhir do statemen

Contoh program Algoritma Perulangan For..downto…do

Program Loop2;
uses crt;
var i:integer;
Begin
   For i:=100 downto 1 do
   Begin
      writeln('Nama Saya');
   End;
   Readln;
end.

2. Algoritma Perulangan While Do

Algoritma Perulangan While Do merupakan algoritma yang melakukan pengulangan “statement” selama kondisi masih terpenuhi. Selama statement bernilai salah, statement akan terus diulangi .

Strukur dari algoritma perulangan while do adalah

While kondisi Do
   Statemen;

Contoh program algoritma while do

Program Loop3;
uses crt;
var i:integer;
Begin
   i:=0;
   while i<4 do
   begin
      writeln(i);
      i:=i+1;
   end;
   Readln;
end.

3. Algoritma Perulangan Repeat-Until

Algoritma repeat-until adalah algoritma yang melakukan pengulangan “statement” sehingga (Until) kondisi terpenuhi. Selama statement bernilai salah, statement akan terus diulangi hingga nilainya benar.

Statement Algoritma Repeat-Until paling sedikit diproses selama 1 kali. Dibawah ini adalah struktur dari Algoritma Repeat-Until

Repeat
   Statemen1;
   Statemen2;
   ...
   Statemen;
Until kondisi;

Contoh Program Pascal Repeat-Until

program repeat_until;
uses crt;
var
  i: integer;
begin
  clrscr;
  i:= 0;
 
  repeat
    begin
      writeln('Hello World');
      i:= i + 1;
    end;
  until i = 10;
  readln;
end.

Dari program tersebut akan memunculkan output seperti ini: