Proses Pengulangan (Looping) Pada Pemrograman Pascal

Beberapa hari ke belakang, Ditempat Saya menimba ilmu yaitu di STT-Bandung, Dosen pembimbing Saya mengadakan sebuah Quis tentang membuat suatu program dengan Proses Pengulangan (Looping) menggunakan Bahasa Pemrograman Pascal, Sempat kebingungan sih !, Tetapi Berkat bimbingan Online dari Linksukses.com, Alhamdulilah Quis pun berjalan dengan lancar.
Berikut listing program yang dimaksud !

program perulangan;
uses crt;
var
I:integer;
begin
clrscr;
I:=1;
while I <=6 do
begin
writeln ('perulangan ke-',I);
I:=I+1;
end;
readln;
end.

Program diatas menggunakan Turbo pascal 7

Setelah dieksekusi Listing Program tersebut menjadi:



Bagaimana, Ada yang belum dimengerti? Apabila belum, Silakan coment, Bagian mana yang belum anda mengerti, Insyaallah Saya akan menjelaskannya dengan senang hati !
Salam Blogger !!
selamat mencoba dan semoga sukses !