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 :
Bentuk
Umum :
Bentuk
Proses (Flow Chart) :
Contoh 1
“ Program Deret “
Ø ScreenShoot
Script dalam Free Pascal
Ø ScreenShoot
Akhir
Contoh 2
“
Program Exponen “
Ø ScreenShoot
Script dalam Free Pascal
Ø ScreenShoot
Akhir
Contoh 3
“ Program Perulangan “
Ø ScreenShoot
Script dalam Free Pascal
Ø ScreenShoot
Akhir
Contoh 4
“ Program Anak Ayam “
Ø ScreenShoot
Script dalam Free Pascal
Ø ScreenShoot
Akhir
Contoh 5
“ Program Array_dengan_While_Do “
Ø ScreenShoot
Script dalam Free Pascal
Ø ScreenShoot
Akhir
