Sabtu, 05 Maret 2011

Perulagan dengan DELPHI

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: