Mata Kuliah Algoritma dan Pemrograman 4 SKS Chapter

Mata Kuliah : Algoritma dan Pemrograman / 4 SKS Chapter 5 -2 : Perulangan (Repeatition) Dosen Pengasuh : Fatoni, M. M. , M. Kom toniubd@yahoo. com

Materi Yang Dipelajari Struktur Perulangan FOR Struktur Perulangan WHILE … DO Struktur Perulangan REPEAT … UNTIL Tanggal : 3/11/2021 Dosen Pengasuh : Fatoni, MM. , M. Kom. 2

Struktur Perulangan WHILE … DO • Perulangan dengan statemen WHILE digunakan untuk melakukan proses perulangan suatu statemen atau blok statemen secara terus-menerus selama kondisi ungkapan-logika pada WHILE masih bernilai logika benar. Tanggal : 3/11/2021 Dosen Pengasuh : Fatoni, MM. , M. Kom. 3

Perulangan WHILE … DO pada Perulangan Positif • Perulangan positif adalah perulangan dengan penghitung (counter) dari kecil ke besar atau dengan kata lain pertambahannya positif. Biasanya pada perulangan ini untuk ungkapan-logikanya menggunakan ungkapan-logika ‘<‘ (lebih kecil) atau ‘<=‘ (lebih kecil sama dengan). • Formatnya : Contohnya : WHILE ungkapan-logika DO BEGIN pernyataan counter+1 END; WHILE X <= 5 Do BEGIN pernyataan counter+1 END; Penulisan syntax dengan menggunakan format seperti ini digunakan untuk menuliskan pernyataan yang terdiri lebih dari satu pernyataan. Tanggal : 3/11/2021 Dosen Pengasuh : Fatoni, MM. , M. Kom. 4

Perulangan WHILE … DO pada Perulangan Positif • Contoh : Tampilkan tulisan “Saya sedang belajar Algoritma dan Bahasa Pascal”, sebanyak 10 kali perulangan. • Programnya : Program Perulangan 1; { Perulangan Positif dengan Lebih Pernyataan } { Deklarasi } Uses Crt; Var X : Integer; { Deskripsi } Begin Clrscr; X : = 1; While X<= 10 Do Begin Write(‘Tulisan ke : ‘, X, ’ ‘); Writeln(‘Saya sedang belajar Algoritma dan Bahasa Pascal’); X : = X+1; End; Repeat Until Keypressed; End. Tanggal : 3/11/2021 Dosen Pengasuh : Fatoni, MM. , M. Kom. 5

Perulangan WHILE … DO pada Perulangan Positif • Hasilnya (Output) pada Program tersebut : Tulisan Tulisan Tulisan Tanggal : 3/11/2021 ke ke ke : : : : : 1 Saya sedang belajar Algoritma dan Bahasa Pascal 2 Saya sedang belajar Algoritma dan Bahasa Pascal 3 Saya sedang belajar Algoritma dan Bahasa Pascal 4 Saya sedang belajar Algoritma dan Bahasa Pascal 5 Saya sedang belajar Algoritma dan Bahasa Pascal 6 Saya sedang belajar Algoritma dan Bahasa Pascal 7 Saya sedang belajar Algoritma dan Bahasa Pascal 8 Saya sedang belajar Algoritma dan Bahasa Pascal 9 Saya sedang belajar Algoritma dan Bahasa Pascal 10 Saya sedang belajar Algoritma dan Bahasa Pascal Dosen Pengasuh : Fatoni, MM. , M. Kom. 6

Perulangan WHILE … DO pada Perulangan Negatif • Perulangan negatif adalah perulangan dengan penghitung (counter) dari besar ke kecil atau dengan kata lain pertambahannya negatif. Biasanya pada perulangan ini untuk ungkapan-logikanya menggunakan ungkapanlogika ‘>‘ (lebih besar) atau ‘>=‘ (lebih besar sama dengan). • Formatnya : Contohnya : WHILE ungkapan-logika DO BEGIN pernyataan counter-1 END; WHILE X >= 1 Do BEGIN pernyataan counter-1 END; Penulisan syntax dengan menggunakan format seperti ini digunakan untuk menuliskan pernyataan yang terdiri lebih dari satu pernyataan. Tanggal : 3/11/2021 Dosen Pengasuh : Fatoni, MM. , M. Kom. 7

Perulangan WHILE … DO pada Perulangan Negatif • Contoh : Tampilkan tulisan “ 5 angka terbesar ke-1”, sampai dengan seterusnya hingga menjadi “ 1 angka terbesar ke-5”. • Programnya : Program Perulangan_2; { Perulangan Negatif dengan Lebih Pernyataan } { Deklarasi } Uses Crt; Var X, C : Integer; { Deskripsi } Begin Clrscr; X: =5; C: =1 While X >= 1 Do Begin Writeln(X, ’ Angka Terbesar ke-’, C); X : = X-1; C : = C+1; End; Repeat Until Keypressed; End. Tanggal : 3/11/2021 Dosen Pengasuh : Fatoni, MM. , M. Kom. 8

Perulangan WHILE … DO pada Perulangan Negatif • Hasilnya (Output) pada Program tersebut : 5 4 3 2 1 Angka Angka Tanggal : 3/11/2021 Terbesar Terbesar ke-1 ke-2 ke-3 ke-4 ke-5 Dosen Pengasuh : Fatoni, MM. , M. Kom. 9

Perulangan WHILE … DO pada Perulangan Tersarang (Nested Loop) • • • Perulangan tersarang (nested loop) adalah perulangan yang berada didalam perulangan lainnya. Perulangan yang lebih dalam akan diproses terlebih dahulu sampai habis, kemudian perulangan yang lebih luar baru akan bertambah, mengerjakan perulangan yang lebih dalam lagi mulai dari nilai awalnya dan seterusnya. Perulangan tersarang ini bisa divariasikan antara perulangan yang berada diluar dengan yang berada didalam, dengan kombinasinya adalah perulangan tersarang positif–positif, positif-negatif, negatif-positif, dan negatif-negatif. Formatnya perulangan tersarang-nya : WHILE ungkapan_logika_ke 1 DO BEGIN WHILE ungkapan_logika_ke 2 DO BEGIN pernyataan counter_ke 2 END; counter_ke 1 END; Tanggal : 3/11/2021 Dosen Pengasuh : Fatoni, MM. , M. Kom. 10

Perulangan WHILE … DO pada Perulangan Tersarang (Nested Loop) • Contoh : Buatlah tampilan perhitungan perkalian 1 dan 2 dikalikan dengan angka 1 sampai dengan angka 5. • Programnya : Program Perulangan_3; Uses Crt; Var X, Y : Integer; Begin Clrscr; X: =1; While X <= 2 Do Begin Y: =1; While Y <= 5 Do Begin Writeln(X, ’ x ’, Y, ’ = ‘, X*Y); Y : = Y+1; End; X : = X+1; End; Repeat Until Keypressed; End. Tanggal : 3/11/2021 Dosen Pengasuh : Fatoni, MM. , M. Kom. 11

Perulangan WHILE … DO pada Perulangan Tersarang (Nested Loop) • Hasilnya (Output) pada Program tersebut : 1 1 1 2 2 2 x x x x x 1 2 3 4 5 = = = = = Tanggal : 3/11/2021 1 2 3 4 5 2 4 6 8 10 Dosen Pengasuh : Fatoni, MM. , M. Kom. 12

Dosen Pengasuh : Fatoni, MM. , M. Kom toniubd@yahoo. com