Perulangan mengizinkan program untuk mengeksekusi deret pernyataan secara berulang-ulang, menggunakan suatu kondisi atau variabel kontrol untuk menentukan kapan eksekusi akan berhenti. Ada tiga buah kontrol perulangan, yaitu for, while, dan repeat. Untuk menghentikan atau mengendalikan sebuah perulangan dapat digunakan pernyataan break dan continue. Break menghentikan pernyataan dimana ia berada, sementara
continue untuk mengabaikan pernyataan di bawahnya dan mulai iterasi berikutnya.
Syntax-syntax perulangan di Delphi
FOR …. DO …
for variabel := nilaiawal to nilaiakhir do
<pernyataan>
for variabel := nilaiakhir downto nilaiawal do
<pernyataan>
Contoh
Var u,k : integer;
Begin
u := 0;
For k := 0 to 10 do
u := u + k;
End
WHILE … DO …
• while (kondisi) do
<pernyataan>
Contoh
Var u,k : integer;
Begin
u := 0;
k := 0;
while (k<10) do
begin
inc(k) ;
u := u + k;
end;
End;
REPEAT … UNTIL ….
repeat
<pernyataan>
until (kondisi)
Contoh
Var u,k : integer;
Begin
u := 0;
k := 0;
repeat
inc(k) ;
u := u + k;
until k > 9;
Tidak ada komentar:
Posting Komentar