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 : 175
Users Yesterday : 102
This Month : 375
This Year : 19999
Total Users : 162756
Views Today : 292
Total views : 454191