Layaknya bahasa pemrograman lain, bahasa pemrograman Pascal pun memilki apa yang disebut dengan Array, Record dan Konstanta. Pengertian dari Array, Record dan Konsatnta pada bahasa pemrograman Pascal sama dengan pengertian atau definisi array record dan konstanta pada bahasa pemrograman yang lain.
Berikut akan dijelaskan definisi dari Array Record dan Konstanta pada bahasa pemrograman Pascal beserta contohnya:
1. Array pada bahasa Pemrograman Pascal
Definisi Array
Array adalah sebuah struktur data yang terdiri atas banyak variable dengan tipe data yang sama, dimana masing-masing elemen variable mempunyai nilai index. Setiap elemen array mampu untuk menyimpan satu jenis data.
Array merupakan struktur data yang statis, yaitu jumlah elemen yang ada harus ditentukan terebih dahulu dan tidak bisa diubah saat program berjalan.
Contoh Program Array
uses wincrt; var f : array [0..25] of integer; i,n : integer; begin write('Masukan Jumlah Deret'); readln(n); f[0] := 1; f[1] := 1; write('Deret Fibanoci'); write(f[0]:5,f[1]:5); for i:=2 to (n-1) do f[i] := f[i-1] + f[i-2]; write(f[i]:5); end; end.
2. Record pada Bahasa Pemrograman Pascal
Definisi Record
Record merupakan sebuah rekaman yang disusun oleh beberapa field. Tiap field berisi data dari tipe dasar atau bentukan tertentu. Record mempunyai kelebihan untuk menyimpan suatu sekumpulan elemen data yang berbeda-beda tipenya.Contoh Program Record
uses wincrt; type tsiswa = record noabsensi = integer nama = string[25] end; var s:tsiswa; begin writeln('Isikan Data Anda'); write('No Absensi :');readln(s.noabsensi); write('Nama :');readln(s.nama); writeln('-------------------------------'); writeln('Data-Data Diatas Merupakan Benar'); writeln('No Absensi :',s.noabsensi); write('Nama :',s.nama); end.
2. Konstanta pada Bahasa Pemrograman Pascal
Definisi Konstanta
Konstanta merupakan variabel yang mempunyai nilai yang tetap meskipun telah dilibatkan dalam beberapa kali operasi aritmatika ataupun logika.Contoh Program Konstanta
uses wincrt; const max = 100; var nilai : array[1..max]of integer; i,n : integer; begin write('Masukan Banyak Elemen'); readln(n); writeln('Masukan Data'); for n := 1 to n do begin writeln('--------------------------------'); writeln('Menampikan Data'); for n:=1 to n do writeln('Nilai[',n,']',nilai[n]); end.
Demikian penjelasan mengenai definisi dari Array Record dan Konstanta pada bahasa pemrograman Pascal beserta contohnya, semoga bermanfaat bagi anda.
sip sip thx ilmunya
BalasHapus