Array Pada Pascal

Array adalah sekelompok data sejenis yang disimpan ke dalam variabel dengan nama yang sama, dengan memberi indekx pada variabel untuk membedakan antara yang satu dengan yang lain. Array dapat berupa satu dimensi, dua dimensi, tiga dimensi dan berdimensi banyak.

Pada kali ini, saya akan memberikan contoh penggunaan Array satu Dimensi :

Kumpulan elemen yang identik yang tersusun satu baris bentuk umum :

Var : 

Array [Indeksnya] of TipeData;

==================================================

Program Hitung;

Uses wincrt;

Var

Bilangan : Array [1..10] of integer;

a,b,jml:integer;

Begin

Clrscr;

Write ('Masukan Bilangan :');readln(b);

for a:=1 to b do

Begin

write ('Masukan Bilangan Ke ',a,' = ');readln(bilangan [a]);    

jml:=jml+Bilangan [a];

end;

writeln('Jumlah Bilangan yang diinput ',jml);

write ('Bilangan yang dimasukkan adalah :');

for a := 1 to b do

write ( bilangan [a]:4);

end.  

===================================================

Berikut Hasil jadinya :

Credit,

By me : Adyt

&

My Sensei : Cool