Pengertian Looping dalam Bahasa Pemrograman Delphi

syntaxdelphi.blogspot.com – Setelah sebelumnya saya menjelaskan tentang pengertian percabangan if then dan case of dalam bahasa pemrograman delphi kali ini saya akan menjelasakan pengertian looping dalam bahasa pemrograman delphi. Looping/pengulangan adalah sebuah perintah yang berfungsi untuk mengulang suatu statement, banyaknya statement yang diulang tergantung pada nilai yang telah dimasukan dan statement akan berhenti mengulang apabila jumlah statemen yang ditampilkan tidak lebih dari sama dengan nilai yang dimasukan.

Looping dalam bahasa pemrograman delphi dibagi kedalam 3 mecam, yang pertama For To do, kedua while do, dan yang ketiga repeat until.

For To Do

Pengertian Looping/Pengulangan dengan menggunakan for to do adalah sebuah pengulangan yang mana suatu nilai akan berhenti apabila nilai tersebut sudah bernilai true atau sudah memenuhi persyaratan yang sudah ditentukan.

Contoh

Var i:integer;
Begin
For i:=1 to 5 do
Begin
Memo1.Text:=IntToStr(i);
End;
End.

Dalam syntax diatas bisa disimpulkan bahwa pengulangan akan terus berlanjut sampai angka 5 ditampilkan pada listbox dimana angka 5 adalah nilai yang bernilai true atau persyaratan yang telah ditentukan. Jadi, proses looping/pengulangan akan berhenti apabila angka 5 sudah muncul pada memo.

While Do

Pengertian Looping/pengulangan dengan menggunakan while do sebenarnya hampir sama dengan for to do hanya saja pada pengulangan while do nilai awalnya harus dicantumkan terlebih dahulu. Selain itu, dalam pengulangan while do bisa menggunakan operasi aritmatika seperti lebih besar(>), lebih kecil(<), dll.

Contoh

Var i:integer;
Begin
I:=0;
While i>5 do
Begin
I:=i+1;
Memo1.Text:=IntToStr(i);
End;
End. 

Repeat Until 

Pengertian looping/pengulangan dengan menggunakan repeat until adalah sebuah pengulangan yang mana suatu statemen/nilai yang ada dalam repeat tersebut akan berhenti dieksekusi jika nilai yang ada pada until sudah bernilai false.

Contoh

var
i : integer;
begin
i := 1;
repeat
i := i + 1;
Memo1.Text := inttostr(i);
until i = 5;
end;

Nah itu dia pengertian looping/pengulangan dalam bahasa pemrograman delphi yang mudah-mudahan bisa bermanfaat bagi kalian para pembaca .... Sekian.

• 3comment

Achmad Fajar

"Musuh yang sebenarnya bukanlah orang lain, melainkan ego diri kita sendiri. Jadi, kalahkanlah ego diri kita sendiri, maka kesuksesan dapat diraih!".

Related Posts

Delphi