Struktur Nested For dalam Pascal

oke.....Assalamualaikum Gan? nested for tau gan? kalo belum tau liat di postingan yang ini neh gan "If Bertingkat dalam Pascal" , kalo gag mao kesana sininih ane kasih tau tapi singkat...

Nested for itu perulangan for yang didalam for tersebut ada for lagi, ya keliatannya seperti anaknya gitu hehe:D
kalo kurang jelas langsung aja nih Syntax-nya cekidot:

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

kalo masih bingung??? langsung aja nih gan liat contohnya

uses wincrt;
var
 jk,js:integer;

  nm,kls:string;
begin
 write('Jumlah kelas    : );readln(jk);
 for jk:=1 to jk do
  begin
   write('Jumlah Siswa    : ');readln(js);
   writeln('Kelas ke',jk);
   for js:=1 to js do
    begin
     write('Nama            : ');readln(nm);
     write('Kelas           : ');readln(kls);
    end;
  end;
end.

oke mungkin itu cukup jelas ya gan?  hehe, maklum ane masih nubi gan...
ane tutup sampai disini kalo ada kata yang salah mohon di maapin ya gan, kalo perlu kasih komentarnya gan... :D