Pernyataan for biasanya digunakan untuk melakukan pengulangan yang jumlahnya telah diketahui sebelumnya.
For variable :=
• Pengulangan Positif : pengulangan dengan penghitung (counter) dari kecil ke besar atau dengan kata lain pertambahannya positif.
• Pengulangan Negatif : pengulangan dengan penghitung (counter) dari besar ke kecil atau dengan kata lain pertambahannya positif.
Contoh pengulangan positif:
Program segitiga_pascal;
uses wincrt;
var n,i,j:integer;
begin
write('Masukkan angka untuk segitiga asyik: ');readln(n);
for j:=1 to n do
begin
for i:=1 to j do
write (5:4);
writeln;
end;
end.
Apabila program dijalankan, maka akan menghasilkan tampilan sebagai berikut:
Masukkan angka untuk segitiga asyik: 3 (Masukkan angka, misal 3)
5
5 5
5 5 5
Contoh pengulangan negatif:
Program segitiga_pascal;
uses wincrt;
var n,i,j:integer;
begin
write('masukkan angka untuk segitiga asyik: ');readln(n);
for j:=n downto 1 do
begin
for i:=1 to j do
write (15:4);
writeln;
end;
end.
Apabila program dijalankan, maka akan menghasilkan tampilan sebagai berikut:
Masukkan angka untuk segitiga asyik: 3 (Masukkan angka, misal 3)
5 5 5
5 5
5
2. WHILE DO
Pernyataan while-do biasanya digunakan untuk melakukan pengulangan yang jumlahnya tidak diketahui dan diulang hingga kondisi salah.
While
Contoh:
Program while_do;
uses wincrt;
var x:integer;
begin
x:=1;
while (x<6) do
begin
writeln(x,'. Pemrograman komputer');
x:=x+1;
end;
end.
Apabila program dijalankan, maka akan menghasilkan tampilan sebagai berikut:
1. Pemrograman Komputer
2. Pemrograman Komputer
3. Pemrograman Komputer
4. Pemrograman Komputer
5. Pemrograman Komputer
3. REPEAT…UNTIL
Repeat biasa dipakai untuk menangani pengulangan yang jumlahnya belum pasti, diulang hingga kondisi benar.
Repeat
Pernyatan_1;
Pernyatan_2;
…
Pernyatan_n;
Until
Contoh:
Program Repeat_until;
uses wincrt;
var x:integer;
begin
x:=1;
repeat
writeln (x,'. Pemrograman Komputer');
x:=x+1;
until x>5;
end.
Apabila program dijalankan, maka akan menghasilkan tampilan sebagai berikut:
1. Pemrograman Komputer
2. Pemrograman Komputer
3. Pemrograman Komputer
4. Pemrograman Komputer
5. Pemrograman Komputer
Tidak ada komentar:
Posting Komentar