Perulangan Pada Bahasa Pascal

perulangan adalah suatu perintah yang menjalankan suatu perintah tersebut secara terulang-ulang sampai suatu kondisi terpenuhi.

perulangan ada 3 jenis:

1. perulangan for-do

2. perulangan while-do

3. perulangan repeat-until

perulangan for-do

contoh:

program mahasiswa;

uses crt;

var

i:integer;

begin

clrscr;

for i:= 1 to 5 do

writeln(‘Belajar Pascal’);

readln

end.

Hasil:

Belajar Pascal

Belajar Pascal

Belajar Pascal

Belajar Pascal

Belajar Pascal

program downto_do;

uses crt;

var

i:integer;

batas:integer;

begin

clrscr;

write(‘Masukan nilai :’);

readln(batas);

for i:= 10 downto 1 do

write(i, ‘ ‘);

readln

end.

perulangan while-do

program while_do;

uses crt;

var

i:integer;

begin

i :=1;

while i<5 do

begin

writeln(‘perulangan ke ‘,i);

i:=i+1;

end;

readln

end.

perulangan repeat-until

program repeat_until;

uses crt;

var

i:integer;

begin

i:=5;

repeat

 write(i,’ ‘);

 if i mod 20 = 0 then writeln;

 i:=i+5;

 until i>=61;

readln

end.

3 thoughts on “Perulangan Pada Bahasa Pascal

  1. […] Perulangan Pada Bahasa Pascal […]

  2. […] Perulangan Pada Bahasa Pascal […]

  3. PortalBugs mengatakan:

    Sangat bermanfaat gan.. terimakasih🙂

Post Comments:

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s