Contoh Sederhana Pengulangan For to Do untuk Delphi

Contoh Sederhana Pengulangan For to Do untuk Borland 7 – Pengulangan For to Do merupakan perintah pengulangan yang paling sederhana diantara perintah pengulangan lain yang disediakan oleh Delphi. Pengulangan For to Do digunakan untuk melaksanakan pengulangan satu pernyataan atau satu blok program beberapa kali yang ditentukan oleh nilai awal dan nilai akhir. Dengan kata lain, jumlah pengulangan yang akan dikerjakan sudah diketahui. Contoh Sederhana Pengulangan For to Do untuk Borland 7

Syntax :

for <pencacah> := <awal> to <akhir> do

<pernyataan>;

Atau :

for <pencacah> := <awal> downto <akhir> do

<pernyataan>;

<pencacah> adalah variabel bertipe ordinal, yaitu variabel yang mempunyai nilai pasti jika dikurangi atau ditambah satu satuan, misalnya byte, integer, dan lain-lain. Nilai <pencacah> tidak boleh diubah dalam <pernyataan>.

Contoh :

for i := 1 to 20 do

Jumlah := Jumlah + 1;

J := 20;

for i := 1 to j do

begin

Jumlah := Jumlah + 1;

j := j + 1;

end;

Contoh Sederhana Pengulangan For to Do untuk Delphi

Silahkan anda double klik pada button proses

procedure TForm1.Button1Click(Sender: TObject);
var
a,b : INTEGER;
begin
a:=StrToInt(Edit1.Text);
for b:=0 to a do
begin
Memo1.Lines.Add (IntToStr(b));
end
end;

end.

Semoga bermanfaat :D

Contoh Sederhana Pengulangan For to Do untuk Borland 7


Tagged:

    contoh program delphi sederhana, contoh program perulangan delphi, contoh syntax delphi, codding program for do delphi menghitung penjualan

One thought on “Contoh Sederhana Pengulangan For to Do untuk Delphi

Comments are closed.