STRUKTUR PENGULANGAN PADA PASCAL

Perulangan (loop) merupakan bentuk yang sering ditemui dalam suatu program
aplikasi. Di dalam bahasa Pascal, dikenal tiga macam perulangan, yaitu dengan
menggunakan statemen For, While-Do dan Repeat….Until.
perbedaan WHILE DO dengan REPET UNTIL adalah terletak pada pengujian kondisi.
jika REPEAT UNTIL perintah dilakukan terlebih dahulu baru dilakukan pengujian.
sedangkan WHILE DO pengujian dilakukan diawal beru perintah dieksekusi.
perbaaan lainya yaitu REPEAT UNTIL mengulang pernyataan selama kondisi belum terpenihi sedang WHILE DO mangulang pernyataan selama kondisimasih terpenuhi
Struktur pengulangan FOR..TO..DO.. digunakan pada suatu kondisi dimana sebuah pernyataan akan dillakukan perulangan sebayak X kali tersantung statement yang akan ditentukan. sebagai contoh:
Contoh program for to do:
Program Perulangan_For_Positif;
Var i : byte;
Begin
For i := 1 To 5 Do
Begin
Write ('No ');
Writeln (i);
End;
Readln;
End.
pada statement diatas maka akan terjadi pengulangan penulisan sebanyak 5 kali.
LaughingWHILE..DO.. digunakan pada kondisi dimana suatu pernyataan yang akan diulang belum tentu berapa kali terjadi pengulangan. pengulangan baru akan berakhir jika kondisi sudah terpenuhi.
CONTOH while do:
Program Perulangan_While_Do;
Var i : byte;
Begin
i := 1;
While i <= 5 Do Begin Write ('No '); Writeln (i); i := i + 1; End; Readln; End. , WinkREPEAT UNTIL : sama seperti WHILE DO hanya saja pengecekan kondisi dilakukan pada saat terakhir. CONTOH : Program Perulangan_Repeat_Until; Var i : byte; Begin i := 1; Repeat Write ('No '); Writeln (i); i := i + 1; Until i > 5;
Readln;
End ..