Proses yang Berulang Pada Pascal

9.1 Proses Yang Berulang

Seringkali kita harus melakukan pengulangan terhadap suatu proses. Untuk memudahkan hal ini, turbo pascal menyediakan tiga macam pernyataan :
 FOR,
 WHILE,
 REPEAT.

Dengan menggunakan pernyataan ini, suatu proses yang berulang dapat ditulis dengan kode yang pendek. Sebagai contoh, jika anda diminta menampilkan tulisan “Turbo Pascal” seratus kali, tidaklah mungkin kita menuliskan perintah writeln (‘turbo pascal’) seratus kali. Bila hal ini harus dilakukan karena tidak ada pernyataan lain yang mendukung, pemograman akan terasa membosankan. Untungnya hal ini tidak harus terjadi !
Ketiga pernyataan di atas merupakan komponen yang membuat pascal merupakan suatu bahasa pemograman yang terstruktur. Suatu pengulangan dapat dilakukan tanpa menggunakan pernyataan GOTO sebagaimana dilakukan pada bahasa-bahasa pendahulu pascal (meskipun pascal juga menyediakannya).

Terdapat istilah loop atau kalang. Istilah ini menyatakan proses yang berulang.

9.2 Pernyataan FOR

Pernyataan FOR biasa digunakan untuk melakukan pengulangan yang jumlahnya telah diketahui sebelumnya. Sebagai contoh, FOR dapat digunakan untuk menampilkan tulisan ‘Turbo Pascal’ 10 kali atau pun dalam jumlah yang lebih banyak lagi.

9.2.1 FOR TO
Salah satu bentuk pernyataan FOR adalah sebagai berikut :
FOR variabel := nilai_awal TO nilai_akhir DO
Pernyataan

Gambar 9.1 Pernyataan FOR
Pada format ini,variabel bertindak sebagai variabel pengontrol pengulangan. Variabel akan diisi dengan nilai, dimulai dari nilai_awal hingga nilai_akhir untuk setiap iterasi (putaran). Untuk setiap iterasi, pernyataan akan dijalankan. Gambar 9.1 menunjukkan mekanisme pengulangan oleh FOR.

Pada bentuk FOR diatas :
 Variabel, nilai_akhir dan nilai_awal harus bertipe sama atau kompatibel.
 Tipe yang digunakan pada ketiga komponen tersebut harus berupa ordinal.
 Nilai_awal harus lebih kecil atau sama dengan nilai_akhir. Kalau nilai_akhir lebih kecil dari nilai_awal, bagian pernyataan tidak dijalankan sama sekali.

Contoh program yang menggunakan FOR untuk menampilkan tulisan ‘Turbo Pascal’ 10 kali :
Program 9.1

PROGRAM X10;
{—————————————————– }
{ contoh pemakaian FOR untu }
{ menampilkan tulisan turbo pascal 10 kali.}
{—————————————————– }

Uses crt;
Var
Pencacah: integer ;
Begin
Clrscr;
FOR Pencacah := 1 TO 10 DO
Writeln (‘Turbo Pascal’ );
End.

Akhir Program

Pada contoh diatas, pencacah akan bernilai 1, 2, 3, 4 hingga 10 secara berturut-turut. Untuk setiap nilai tersebut, pernyataan :
Writeln (‘Turbo Pascal’);
Dieksekusi. Sebagai akibatnya, pada layar muncul tulisan :
Turbo Pascal
Sebanyak 10 kali.

Pada contoh berikut, isi variabel pengontrol FOR ditampilkan.
Program 9.2

Program deret;
{———————————————————- }
{ menampilakan bilangan 1 sampai dengan 10 }
{———————————————————– }
Uses crt;
Var
Pencacah : integer;
Begin
Clrscr;
FOR Pencacah := 1 TO 10 DO
Writeln (‘pencacah’);
End.
Akhir Program

Hasilnya berupa bilangan dari 1 sampai dengan 10:
1
2
3
4
5
6
7
8
9
10

Di depan telah dijelaskan bahwa nilai awal yang diberikan pada FOR-TO harus lebih kecil dari nilai akhir. Apa yang terjadi seandainya aturan ini dilanggar ? Marilah kita lihat contoh berikut :
FOR Pencacah := 10 TO 1 DO
Writeln (‘pencacah’);
Perintah seperti diatas tidak menghasilkan keluaran apapun. Anda dapat melihat Gambar 9.1 untuk menganalisis kenapa hasilnya tidak ada.

Sebuah gambaran atas penggunaan pernyataan majemuk didalam pernyataan FOR ditunjukkan pada program berikut :
Program 9.3

Program rata2;
{——————————————————————– }
{ contoh program untuk menghitung nilai rata-rata }
{ dari sejumlah nilai. }
{——————————————————————– }

Uses crt;
Var
Nilai, {menampung data dari keyboard}
Jum : real ; {untuk menampung jumlah semua data}
Pencacah : integer ;
Begin
Clrscr;
Jum :=0; {diisi dengan nol terlebih dahulu}
FOR Pencacah := 1 TO 5 DO
Begin
Write (‘nilai ke-‘, pencacah,’ :’);
Readln (nilai);
Jum := jum + nilai; {tambahkan nilai ke jum }
End;
Writeln(‘nilai rata-rata=’, jum/5 :0:2);
End.

Akhir Program

Iklan

695 Comments

  1. Wow, incredible blog layout! How long have you been blogging for? you made blogging look easy. The overall look of your website is fantastic, as well as the content!. Thanks For Your article about Proses yang Berulang Pada Pascal | Rumah Radhen .

  2. Ping-balik: add effects to photos
  3. Ping-balik: plr wordpress themes
  4. Ping-balik: Why Do Men Pull Away
  5. Ping-balik: six pack shortcut
  6. Ping-balik: big cock
  7. Wow, amazing blog layout! How long have you been blogging for? you made blogging look easy. The overall look of your website is excellent, let alone the content!. Thanks For Your article about Proses yang Berulang Pada Pascal | Rumah Radhen .

  8. Ping-balik: outlook
  9. Ping-balik: epx body opportunity
  10. Ping-balik: free bukkake
  11. Wow, wonderful blog layout! How long have you been blogging for? you make blogging look easy. The overall look of your website is excellent, as well as the content!. Thanks For Your article about Proses yang Berulang Pada Pascal | Rumah Radhen .

  12. Ping-balik: Facebook Money Cube
  13. Ping-balik: abac bangna
  14. Ping-balik: melaleuca scam
  15. Ping-balik: free microsoft codes
  16. Wow, awesome blog layout! How long have you been blogging for? you made blogging look easy. The overall look of your site is wonderful, as well as the content!. Thanks For Your article about Proses yang Berulang Pada Pascal | Rumah Radhen .

  17. Wow, wonderful blog layout! How long have you been blogging for? you make blogging look easy. The overall look of your web site is fantastic, as well as the content!. Thanks For Your article about Proses yang Berulang Pada Pascal | Rumah Radhen .

  18. Wow, incredible blog layout! How long have you been blogging for? you made blogging look easy. The overall look of your website is fantastic, as well as the content!. Thanks For Your article about Proses yang Berulang Pada Pascal | Rumah Radhen .

  19. Wow, amazing blog layout! How long have you been blogging for? you make blogging look easy. The overall look of your site is magnificent, let alone the content!. Thanks For Your article about Proses yang Berulang Pada Pascal | Rumah Radhen .

  20. Wow, superb blog layout! How long have you been blogging for? you make blogging look easy. The overall look of your site is great, let alone the content!. Thanks For Your article about Proses yang Berulang Pada Pascal | Rumah Radhen .

  21. Woah! I’m really digging the template/theme of this site.
    It’s simple, yet effective. A lot of times it’s challenging to get that “perfect balance”
    between superb usability and visual appeal. I must say that you’ve done a
    amazing job with this. In addition, the blog loads
    very fast for me on Internet explorer. Superb Blog!

  22. Today, I went to the beach front with my kids. I found a sea shell and gave it to
    my 4 year old daughter and said “You can hear the ocean if you put this to your ear.” She placed
    the shell to her ear and screamed. There was a hermit crab inside and it pinched her ear.
    She never wants to go back! LoL I know this is completely off
    topic but I had to tell someone!

  23. I really love your site.. Pleasant colors & theme. Did you develop this website yourself?

    Please reply back as I’m attempting to create my own website
    and would like to learn where you got this from or just what the theme is named.

    Kudos!

  24. Hi my family member! I wish to say that this article is amazing, nice written and include approximately
    all significant infos. I would like to see extra posts like this .

  25. Hello! I know this is somewhat off topic but I was wondering
    if you knew where I could locate a captcha plugin for my comment form?

    I’m using the same blog platform as yours and I’m
    having problems finding one? Thanks a lot!

  26. I believe that is one of the so much vital info
    for me. And i am happy reading your article. But wanna observation on few common issues, The website style is perfect, the articles is in reality
    excellent : D. Excellent process, cheers

Tinggalkan Balasan

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 )

Foto Google+

You are commenting using your Google+ 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 )

w

Connecting to %s