Perulangan (Looping) dengan “FOR” dalam Pascal.

Assalamualaikum, Ya seperti pada judulnya, kali ini kita akan sedikit share mengenai perulangan (looping) dalam Bahasa pemprograman Pascal.
Ada 3 cara di dalam Bahasa Pemprograman Pascal untuk menyatakan perulangan. Yaitu:
1. FOR - DO
2. WHILE - DO
3. REPEAT - UNTIL
ketiganya mempunyai cara penulisan dan fungsinya masing-masing (meskipun pada dasarnya semua nya digunakan untuk perulangan)
Menurut saya, bagian dari belajar dasar pemprograman yang “membutuhkan waktu lebih” untuk di kuasai adalah bagaian ini.
yah, perulangan. karena akan banyak khasus yang membutuhkan analisa logika teman-teman untuk menyelesaikanya(tentunya berhubungan dengan perulangan)
Kali ini kita akan membahas perlulangan dalam Bahasa Pemprograman Pascal menggunakan FOR - DO. Di dalam Pemprograman pascal, Syntax Looping dengan menggunakan FOR di bedakan menjadi 2 jenis. Yaitu

A. Increasement (bertambah)

FOR <variable> : = <nilai_awal> TO <nilai_akhir> DO

Syntax FOR di atas digunakan untuk perulangan yang nilai awalnya terus bertambah hingga nilai akhir.
atau dalam pengertian dapat di rumuskan :
Printah (statement) di dalam FOR akan selalu di jalankan selama nilai_awal masih <= nilai_akhir.
Kemudian nilai_awal akan selalu di tambahkan 1 di setiap kali perulangan.
Perintah (statement) di dalam FOR akan berkahir/selesai di eksekusi pada saat nilai_awal > nilai_akhir.
Sebagai contoh :
Contoh1
Tampilkan urutan bilangan mulai dari 1 hingga 10
Berikut script penyeselsaianya :

program Contoh1;

var

x: integer;

begin

for x := 1 to 10 do

begin

write(x , ‘ ‘);

end;

readln;

end.

Hasil dari program di atas adalah :

1 2 3 4 5 6 7 8 9 10

nilai dari variable x mula-mula adalah 1, kemudian perintah yang dijalankan adalah write/mencetak variable x .
Kemudian karena x masih kurang dari 10 maka x ditambahkan 1, sehingga sekarang nilai x menjadi 2 .
Dan begitu seterusnya hingga x = 10 maka program perhenti di proses.
B. Decreasement (berkurang)

FOR <variable> : = <nilai_awal> DOWNTO <nilai_akhir> DO

Berkebalikan dengan FOR untuk Increasement, Syntax FOR untuk Decreasement di atas digunakan untuk perulangan dengan penurunan nilai.
Jadi :
Printah (statement) di dalam FOR akan selalu di jalankan selama nilai_awal masih >= nilai_akhir.
Kemudian nilai_awal akan selalu di dikurangi 1 di setiap kali perulangan,
Perintah (statement) di dalam FOR akan berkahir/selesai di eksekusi pada saat nilai_awal < nilai_akhir.
Sebagai contoh :
Contoh2
Tampilkan urutan bilangan mulai dari 15 hingga 5
Berikut script penyelesaianya :

program Contoh2;

var

y: integer;

begin

for y := 15 downto 5 do

begin

write(y ,’’);

end;

readln;

end.

Hasil dari program di atas adalah :

15 14 13 12 11 10 9 8 7 6 5

nilai dari variable y mula-mula adalah 15, kemudian perintah yang dijalankan adalah write/mencetak variable y .
Kemudian karena y masih lebih dari 5 maka y dikurangi 1, sehingga sekarang nilai y menjadi 14 .
Dan begitu seterusnya hingga y = 5 maka program perhenti di proses dan kita sudah mengenal 2 jenis FOR dalam pascal, insyaAlloh bermanfaat.

http://stikesmadani.ac.id/perulangan-looping-dengan-dalam-pascal/http://stikesmadani.ac.id/wp-content/uploads/2014/11/pascal.pnghttp://stikesmadani.ac.id/wp-content/uploads/2014/11/pascal-150x150.png2015-11-20T21:05:02+00:00adminTeknologipascal,perulangan