Struktur perulangan For dalam pascal

seperti pada judul diatas kita akan mengulas tentang struktur perulangan for dalam pascal sampai habis :D
perulangan ini digunakan untuk mempersingkat perintah yg diulang-ulang, benerkan? daripada ngetik script panjang-panjang lebih baik pakai perulangan kan? :D
sok tancap gan:

for Variable:= integer to integer do
 begin
  statement_yang_mau_diulang;
 end;

yap, diatas tadi syntax-nya
nah ini contoh kasusnya

uses wincrt;
var
 js,per:integer;
 nm,kls:string;
begin
 write('Jumlah Siswa   : ');readln(js);
 for per:=1 to js do
  begin
   write('Nama           : ');readln(nm);
   write('Kelas          : ');readln(kls);
  end;
end.

siiip......
segitu aja ya?, ane takutnya kalo ane nulis artikel panjang" nanti agan" bosen....:D
jadi ane langsung ke "point utamanya" OK ;D
sip-sip kalo mao liat contoh perulangan bertingkat atau nested for langsung aja gan kepostingan sebelah :)

wassalam......
Selalu Berusaha untuk menjalani KeSuksesan kita.