2. Pengulangan
Pengulangan digunakan untuk menjalankan satu atau beberapa pernyataan sebanyak beberapa kali.
Statement pengulangan terdiri dari
1. For
2. For Tersarang
3. Repeat.. Until
4. while
5. Break and Continue
2.1. Pernyataan For
Pernyataan pengulangan yang paling sering digunakan adalah for.
Pernyataan ini digunkan bila kita sudah mengetahui berapa kali kita akan mengulang satu atau beberapa pernyataan. Bentuk umum dari statement for :
for pencacah := nilai_awal to nilai_akhir do
begin
( pernyataan – pernyataan yang akan diulang )
end;
contoh:
Var x:byte;
For x := 10 downto 1 do
writeln ( x);
Writeln;
for x := 1 to 12 do
writeln ( x);
2.2 Peryataan for ber sarang
Kita juga dapat menuliskan pernyataan for didalam pernyataan for.
Konstruksi ini sering dinamakan for tersarang.
Contoh:
Tulislah program untuk menampilkan pola NOL sebagai berikut :
0 0 0
0 0 0 0 0 0
0 0 0 untuk n = 2 0 0 0
0 0 0 0 untuk n = 3
untuk n = 4
Algoritma program :
1. Masukan n
2. I ß 1.
3. Selama ( I < = n ) kerjakan baris ke 4 sampai dengan ke 9
4. J ß 1.
5. Selama ( j <=0 ) kerjakan baris ke 6 dan 7.
6. Tulis ‘ 0 ‘
7. I ß j + 1
8. Ganti baris.
9. I ß j + 1.
Programnya
uses wincrt;
var
n : byte;
i, j : byte;
begin
writeln ( 'masukan N :' ); readln(n);
for i := 1 to n do
begin
for j := 1 to i do
write (‘* ');
writeln;
end;
end.
2.3. Pernyataan While.
Pernyataan While digunakan bila kita belum mengetahui berapa jumlah perulangan dengan pasti.
Berakhirnya sebuah perulangan ini ditentukan oleh suatu kondisi. Bi;a kondisi sudah terpenuhi maka pengulangan akan berakhir.
Bentuk umum :
while
begin
(pernyataan-pernyataan yang akan diulang )
end;
kondisi sendiri merupakan ekspresi boolean
contoh program:
uses wincrt;
var i : byte;
begin
i := 1;
while (i < 100 ) do
begin
writeln (i);
i := i + 2;
end;
end.
Output :
1
3
-
97
99
2.4. Pernyataan Repeat.. until
Pernyatan ini hampir sama dengan pernyataan while.
Digunakan bila jumlah pengulangan belum dapat di tentukan pada saan program di tulis.
Perbedaan pernyataan repeat .. Until dengan while terletak pada pengecekan kondisi. Jika pada pernyataan while kondisi di cek pada awal kalang, pada repeat..until kondisi di cek pada akhir kalang.
Perbedaan yang lain, bila pernyataan while mengulang pernyataan selama kondisi masih terpenuhi, pernyataan repeat…until mengulang selama kondisi belum terpenuhi.
Bentuk umum ;
repeat
( pernyataan yang akan diulang )
until kondisi
2.5. Pernyataan Break dan Continue
Untuk menghentikan pengulangan gunakanlah pernyataan break.
Pernyataan break dapat digunakan pada pernyataan repeat..until, for dan while
Contoh :
x := 0;
while ( x >= 0 ) do
begin
x ;= x + 1;
if ( x > 100) then
break;
end.
bila dilihat sekilas kalang diatas sepertinya tidak akan pernah berakhir karena x selalu ditambah 1. padahal kondisi yang harus dipenuhi adalah ( x >= 0 ). Namun bila dijalankan , setelah nilai x lebih besar daripada 100 pengulangan akan berhenti.
Pernyataan Continue adalah bentuk pernyataan khusus lain yang digunakan pada pengulangan.
Pernyataan dibawah continue akan diabaikan ;
Contoh :
for I := 0 to 100 do
begin
if ((I mod 3) <> 0 ) then
continue;
writeln (i);
end;
program ini akan menuliskan semua bilangan kelipatan 3 yang < 100. karena pd saat nilai pencacah pengulangan tidak habis dibagi 3, program memanggil pernyataan Continue, akibatnya pernyataan Writeln (i) tidak dipanggil.
Labels
- Cari duwit lewat internet (2)
- Info IT (2)
- Internet (2)
- Islam (1)
- Kesehatan (1)
- Materi kuliah (7)
- Music (1)
- Networking (2)
- photoshop (6)
- Programing (5)
- Software (2)
- software dan driver (2)
- Tips Dan Trik (15)
Blog Archive
-
▼
2010
(42)
-
▼
Februari
(37)
- "SIN" ROKOK YANG MENYEHATKAN for everyone Komposis...
- Membuat “Real” Tatoo
- Membuat Efek Cinema pada Foto Saya suka bang...
- Membuat Efek Reflection Atau Bayangan Cermin denga...
- Desain Kartu Kredit dengan Photoshop
- Download eBook 1000 Hacking Tutorial
- Hacking Facebook Using Fake Login
- Facebook Hack Tool
- Menggunakan Google dengan Javascript
- Membuat Folder Pribadi Tanpa Menggunakan Software
- PENGURUTAN DATA
- STATEMENT - STATEMENT PEMROGRAMAN PASCAL
- Cara Memasang Kabel UTP Tipe Straight dan Cross
- Hemi-Sync - Metamusic - The Visitation
- Memasang Iklan Google Adsense Pada Blog
- Usaha Saya Sebagai Publisher Adsense
- Situs-situs terbaik penyedia driver komputer
- Atasi masalah pada data di harddisk anda (Windows ...
- Update Windows 7 Terbaru Akan Kenali Crack OS Illegal
- Asesoris mempercantik Blog
- Kumpulan link download WIFItool
- -- Melumpuhkan Access Point dengan Void11 --
- Bagaimana Cara Mengamankan W-LAN ???
- Driver Epson R230
- Pengulangan (ALGORITMA)
- Contoh Soal
- Kumpulan Program Pascal
- Meningkatkan Kecepatan Koneksi Internet dengan Dns...
- BERSIN DAN MENGUAP
- SIFAT TRANSISTOR & TRANSISTOR PADA FREKUENSI REND...
- RANGKAI TRANSISTOR
- TRANSISTOR SEBAGAI SUATU AMPLIFIER
- Transistor FET - JFET dan MOSFET
- Melakukan Perbaikan dan atau Setting Ulang Koneksi...
- PROSEDUR INSTALASI WIRELESS WAN
- Hacking Wireless Hotspot
- Membuat Blog Itu Mudah
-
▼
Februari
(37)
Selasa, 09 Februari 2010
Posted in |
Materi kuliah
|
0 Comments »
About Me
- Arif Fatkur Rahman
- saya adalah seorang yang haus akan ilmu pengetahuan, bagi saya menuntut ilmu adalah wajib tak kenal umur dan waktu dimanapun kapanpun...
One Responses to "Pengulangan (ALGORITMA)"