Headlines News :
Home » » Program Pascal Looping (perulangan)

Program Pascal Looping (perulangan)

Written By Arwani Muhammad on Monday, April 9, 2012 | Monday, April 09, 2012

Looping (perulangan)


     merupakan bentuk yang sering ditemui didalam suatu program aplikasi. Didalam bahasa pascal, dikenal tiga macam perulangan yaitu :dengan menggunakan statemen For, While-Do, dan Repeat…until.

1. For
For biasa digunakan untuk perulangan positif atau perulangan dengan penghitung (couter) dari kecil kebesar atau dengan kata lain pertambahannya positif.
Bu : For variabel-kontrol := nilai awal To nilai-akhir Do statemen
contoh :
var
i :integer;
begin
for i:= 1 to 5 do writeln(‘BSI’);
end.
maka akan menghasilkan :
BSI
BSI
BSI
BSI
BSI

For Nested
contoh :
var
i:integer;
begin
for i:= 1 to 2 do
begin
for j:= 1 to 2 do
write(i:3,j:3);
writeln;
end;
readln;
end.
maka akan menghasilkan :
1 1 1 2
2 1 2 2

  
2. While-do,
digunakan untuk melakukan proses perulangan suatu statemen atau blok statemen terus-menerus selama kondisi logika Benar.
bu : statemen_while while ungkapan_logika do statemen
contoh :
uses crt;
var k:integer;
begin
  k:=1;
  while k<=3 do
  begin
  writeln(‘Halo’);
  k:=k+1;
  end;
end.
Hasilnya :
Halo
Halo
Halo 


3. Repeat Until

digunakan untuk mengulang statemen suatu blok statemen sampai (until) kondisi yang diseleksi di Until tidak terpenuhi.
bu : repeat
  statemen;
  until ungkapan_logika;
contoh:
var i : integer;
begin
i:=0;
repeat
  i:=i+1;
  writeln(i);
until i = 5;
readln;
end. 

Share this article :

0 comments:

Speak up your mind

Tell us what you're thinking... !

Situs-situs Terkait

Music

 
Support : Muhammad Arwani Proudly powered by Blogger
Copyright ; 2012. Agama tanpa ilmu pengetahuan akan buta - All Rights Reserved
Copright SMK Manba'ul Huda Published by Blogger