MATERI PASCAL - Perulangan FOR DO dalam Pascal - Struktur program yang akan kita bahas pada materi kali ini adalah perulangan atau biasa juga disebut dengan looping atau iterasi. Dalam bahasa pemograman Pascal terdapat setidaknya 3 jenis perulangan yaitu FOR DO, WHILE DO dan REPEAT UNTIL.
Pengertian Perulangan FOR DO Pada Bahasa Pemograman PASCAL
Konsep perulangan dalam bahasa pemograman merupakan sebuah fungsi yang memungkinkan kita untuk mengulang bari program beberapa kali. Beberapa kali di sini dikatakan tidak terbatas selama komputer yang kita gunakan masih mampu untuk mengolahnya. Misalnya saya ingin menulis teks "Hallo" sebanyak 100 kali. Tentunya hal ini akan sangat melelahkan jika dilakukan secara manual . Dengan menggunakan fungsi dari perulangan hal tersebut akan sangat mudah dilakukan dengan waktu yang jauh lebih singkat dan cepat, karena hanya membutuhkan beberapa bari kode program saja.
Struktur Penulisan perulangan FOR DO pada Bahasa Pemograman PASCAl
FOR (variabel_counter) := (nilai_awal) TO (Nilai_Akhir) DO
begin
(statment atau kode progam yang ingin diulang di sini)
end;
variabel_counter merupakan variabel yang berfungsi sebagai counter atau penghitung dalam perulangan. Saat program dijalankan maka variabel ini akan otomatis berulang atau naik dari nilai_awal hingga nilai_akhir. Dalam setiap perulangan/kenaikan blok kode program yang berada di dalam begin dan end; akan dijalankan secara berulang sesuai nilai_awal dan nilai_akhir yang diberikan.
Contoh Perulangan FOR DO dalam PASCAL
program ulang;
uses crt;
var
i : integer;
begin
clrscr;
for i := 1 to 100 do
begin
writeln ('Hallo');
end;
Readln
end.
Program dimulai dengan membuat variabel counter yang diberi nama variable i, variabel i merupakan variabel counter. Karena ingin perulangan sebanyak 100 kali maka perintah yang digunakan adalah for i:= 1 to 100 do. Jika diartikan dalam bahasa sehari-hari maka kurang lebih artinya adalah "untuk variabel i jalankan perulangan mulai dari 1 hingga 100". Maka hasilnya adalah sebagai berikut:
seperti yang bisa dilihat program melakukan perulangan pada statment hello sebanyak 100 kali, namun karena keterbatasan layar maka tidak dapat ditampilkan secara keseluruhan. Untuk dapat melihat perulangan yang ke- berapa kita bisa sedikit mengubah programnya menjadi seperti ini :
program ulang;
uses crt;
var
i : integer;
begin
clrscr;
for i := 1 to 100 do
begin
writeln ('Hallo - ', i);
end;
Readln
end.
sehingga hasilnya seperti berikut :
Pada program yang kedua kita bisa melihat banyak perulanganya karena kita juga mencetak variabel i yang merupakan variabel counter.
0 Response to "MATERI PASCAL - Perulangan FOR DO dalam Pascal"
Posting Komentar