12.07.2015 Views

Pertemuan 5 PERULANGAN - iLab

Pertemuan 5 PERULANGAN - iLab

Pertemuan 5 PERULANGAN - iLab

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

P5.1. TeoriPerulangan FOR....NEXTStetement perulangan terdiri dari FOR..NEXT, DO..LOOP, dan WHILE..WEND.FOR..NEXT merupakan perulangan dimana akan berhenti yaitu saat nilai pencacah mencapainilai akhir yang diinginkan tanpa ada proses penyeleksian. Kita bisa mengetahui berapa kaliterjadi perulangan yaitu (nilai_akhir - nilai_awal) * kenaikan.Bentuk umum statement FOR..NEXT :FOR pencacah = nilai_awal TO nilai_akhir [STEP kenaikan][blok statement]NEXT pencacahBerikut flowchartnya:For I=awal to akhirBlok statementNext IGambar 4.1. Bagan Flowchart FOR..NEXTJika STEP tidak disebutkan maka kenaikannya adalah 1.Contoh program :DIM I AS INTEGERDIM X AS INTEGERFOR I=1 TO 5PRINT "Bilangan ke-" ; INEXT IPRINT "10 Bilangan genap pertama : " ;FOR X=2 TO 20 STEP 2PRINT X;Page 44


NEXT XENDOutput program :Bilangan ke-1Bilangan ke-2Bilangan ke-3Bilangan ke-4Bilangan ke-510 Bilangan genap pertama : 2 4 6 8 10 12 14 16 18 20Perulangan DO....LOOPPerulangan DO..LOOP terus dilaksanakan saat kondisi tertentu terpenuhi atau bernilaibenar, jika tidak maka proses perulangan akan berhenti. Penyeleksian kondisi dilakukansetelah kata DO atau LOOP.Bentuk umumnya :DO [{ WHILE | UNTIL } kondisi][blok statement]LOOPAtauDO[blok statement]LOOP [{ WHILE | UNTIL } kondisi]Page 45


Flowchartnya:Blok statementBlok statementKondisi=true?YKondisi=true?TTYBentuk-1 Bentuk-2Gambar 3.2. Bagan Flowchart DO…LOOPBentuk-1 adalah looping dengan menggunakan UNTIL, bentuk-2 dengan WHILE.Perbedaannya adalah bentuk-1 proses looping akan berhenti sampai kondisi bernilai benar(Y)dan sebaliknya. Sedangkan bentuk-2 selama kondisi bernilai benar proses looping akan terusdilakukan.Lihat contoh program berikut :DIM I AS INTEGER, X AS INTEGERI=0DOI= I + 1PRINT I;LOOP UNTIL I=5PRINTX=0DO WHILE X < 5X= X + 1PRINT X;LOOPENDPage 46


Output program :1 2 3 4 51 2 3 4 5Perulangan WHILE....WENDPerulangan WHILE..WEND pada dasarnya sama dengan DO WHILE..LOOP. Selamakondisi bernilai benar proses looping terus dilaksanakan.Bentuk umumnya:WHILE kondisi[blok statement]WENDPage 47


P5.2. Contoh KasusSeorang mahasiswa diminta untuk membuat program tentang perulangan menggunakanbahasa pemrograman qbasic. Program yang dibuat akan menghasilkan output seperti padagambar di bawah ini :Langkah-langkah Pengerjaan1. Klik aplikasi program Qbasic.exe, hingga muncul tampilan seperti pada gambar dibawah ini:Page 48


2. Setelah muncul tampilan diatas, maka selanjutnya tekan ESC pada keyboard untukmengetikkan program yang akan dibuat. Berikut tampilan untuk mengetikkanprogram:3. Selanjutnya kita ketikkan souce code program berikut pada program qbasic.4. Sebelum menjalankan source code tersebut, kita simpan terlebih dahulu source codetersebut, dengan cara klik File pada pada toolbar qbasic.exe Pilih savePilihdirectori untuk menyimpan file ini dan simpan dengan nama file luas.bas. Berikuttampilan tahap penyimpanan.Page 49


5. Setelah selesai menyimpan file tersebut, maka selanjutnya kita menjalankan programtersebut dengan cara menekan SHIFT+F5 , jika program yang telah ddiketikkantelah berhasil, maka program ini akan berjalan, tetapi pada saat program itu dijalankanprogram itu tidak berjalan, maka program tersebut mengalami kesalahan sintaks.Page 50


P5.3. Latihan SoalFOR NUM = 1 TO 7NEXT NUMPRINT NUMENDPertanyaan:Apakah hasil output program diatas?A. 1 2 3 4 5 6 7B. 123456C. 6D. 7E. 8Page 51


P5.4. Daftar Pustaka[1] Jogiyanto H.M, Teori dan Aplikasi Program Komputer Bahasa Basic (edisi ke-5),Andi Offset, 1992.[2] F. Soesianto B.Sc.E, Ir., Eko Nugroho, Ir., P. Insap Santosa, Ir., PemrogramanBasic(edisi ke-2), Andi Offset, Yogyakarta, 1992.[3] Abdul Kadir, Pemrograman QBASIC. Panduan Untuk Belajar Sendiri BahasaBASIC(edisi pertama), Andi Offset, 1995.[4] P. Insap Santosa, Quick Basic, Andi Offset, 1990.Page 52

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!