Sebutkan macam-macam perulangan dalam pascal!

1. Sebutkan macam-macam perulangan dalam pascal!
2. Tuliskan bentuk umumnya!
3. Buatlah program sederhannya menggunakan while!
Jawab:

1.– for…to…do
- While…do
- Repeat…until

2.For…to…do = for…:=…to…do
Begin
…;
…;
End.
While…do = while … do
Begin
…;
…;
End;
Repeat…until = repeat
Begin
…;
…;
End.

3.Program while 1;
Uses Crt;
X:char;
Begin
Clrscr;
While 10 to 15 do
X=15
Writeln (‘nilai x adalah ;X);
Inc (x);
Readln;
End;