Page 133 - Pemrograman Dasar kelas X

Bab 4 Struktur Kontrol Perulangan 129

a := 10;

while a < 20 do
begin
writeln(‘nilai dari a adalah: ', a);

a := a + 1;
end;

end.
Hasil:
nilai dari a adalah: 10

nilai dari a adalah: 11
nilai dari a adalah: 12

nilai dari a adalah: 13
nilai dari a adalah: 14
nilai dari a adalah: 15

nilai dari a adalah: 16
nilai dari a adalah: 17
nilai dari a adalah: 18

nilai dari a adalah: 19

Perulangan dengan struktur FOR DO
Perulangan dengan pencacah, yaitu menggunakan struktur FOR DO dimasukkan dalam
pembahasan pada kegaiatan Belajar ini. Struktur ini digunakan untuk mengulang statement atau

satu blok statement berulang kali sejumlah yang ditentukan.
Bentuk umum :

for nama_variabel := nilai_awal to nilai_akhir do {untuk pencacah naik}
Pernyataan;
atau

for nama_variabel := nilai_awal downto nilai_akhir do {untuk pencacah turun}
Pernyataan;

Untuk lebih jelasnya, perhatikan contoh kode program berikut, beserta hasilnya.

Program FORDO:
Var I : integer;
Begin

For I := 1 to 5 Do
Writeln(‘Pascal’);