Penerapan Perulangan FOR DO Pada Free Pascal

Perulangan For Do digunakan untuk mengulang statement berulang kali sejumlah yang ditentukan. Bila terdapat lebih dari satu statement yang ada di dalam looping maka menggunakan begin...end;, jika hanya satu blok saja tidak perlu menggunakan begin...end;.

Format penulisannya adalah:

for (variabel_counter) := (nilai_awal) to (nilai_akhir) do
  statement yang diulang;

Berikut penerapan programnya.
Contoh 1:
 
 Outputnya:
 

Contoh 2:


Output:

Share: