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:
Format penulisannya adalah:
for (variabel_counter) := (nilai_awal) to (nilai_akhir) do
statement yang diulang;
Berikut penerapan programnya.
Contoh 1:
Outputnya:
Contoh 2:
Output:






Users Today : 55
Users Yesterday : 104
This Month : 1694
This Year : 24780
Total Users : 167537
Views Today : 90
Total views : 464145