Alpro - Pascal 6 | Lenut's Blog

Perulangan dalam Pascal

Pengulangan (loop) merupakan bentuk yang sering ditemui di dalam suatu program aplikasi. Di dalam bahasa Pascal, dikenal tiga macam perulangan, yaitu dengan menggunakan pernyataan For, While-Do, dan Repeat…Until.

VIIA. Struktur Perulangan For

Perulangan dengan pernyataan For digunakan untuk mengulang pernyataan atau satu blok pernyataan berulang kali sejumlah yang ditentukan. Perulangan dengan pernyataan For dapat berbentuk perulangan positif, perulangan negatif dan perulangan tersarang. Bentuk proses :

1. Perulangan positif [For to Do] .

Perulangan positif adalah perulangan dengan penghitung dari kecil ke besar atau pertambahan positif. Perulangan positif dapat dibentuk dengan menggunakan pernyataan For-To-Do, dengan bentuk proses :

Bentuk umum:

Contoh – contoh program For to Do :

Contoh 1

“ Program Faktorial “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 2

“ Program Mencetak_Matrix “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 3

“ Program Hitung_Mundur “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 4

“ Program Mendeteksi_Bilangan_Prima “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 5

“ Program Menghitung_Mean ”

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

2. Perulangan negatif [For downto Do] .

Perulangan negatif adalah perulangan dengan penghitung dari besar ke kecil atau pertambahan negatif. Perulangan negatif dapat dibentuk dengan menggunakan pernyataan For-DownTo-Do, dengan bentuk Proses:

Bentuk umum :

Contoh – contoh program For Downto Do :

Contoh 1

“ Program Menggabung_2_Array_dan_Hasilnya_Menurun “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 2

“ Program Sorting_Bubble “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 3

“ Program Bilangan_Ganjil_Menurun “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 4

“ Program Belajar_Menghitung_Menurun “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 5

“ Program Pengulangan_Bersarang “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

VIIB. Struktur Repeat Until

Struktur Repeat…Until digunakan untuk mengulang pernyataan-pernyataan atau blok pernyataan sampai kondisi yang diseleksi di Until terpenuhi. Mempunyai bentuk proses (flow chart) :

Bentuk umumnya adalah:

Contoh 1

“ Program Berat_Badan “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 2

“ Program Value “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 3

“ Program Baca_berpasangan “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 4

“ Program Konversi_Bilangan “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

Contoh 5

“ Program Konversi_Bilangan “

Ø ScreenShoot Script dalam Free Pascal

Ø ScreenShoot Akhir

VIIC. Struktur While Do

Perulangan ini menggunakan pernyataan While—Do. Pernyataan While—Do digunakan untuk melakukan proses perulangan suatu pernyataan atau blok pernyataan terus-menerus selama kondisi ungkapan logika pada While masih bernilai logika benar. Mempunyai struktur sebagai berikut :