Array digunakan untuk input data di pemrograman pascal. Contohnya jika kita diminta untuk menghitung rata-rata, maka kita diminta untuk menginputkan data-data bilangan yang akan dimasukkan ke dalam perhitungan. Rata-rata dihitung dengan menjumlahkan seluruh data, lalu dibagi dengan banyaknya data.
Coding untuk array tersebut dapat dilihat pada bagian di bawah:
program rata_rata;
uses crt;
type
larik=array[1..10] of integer;
var
x:larik;
tot, n, i : integer;
mean: real;
begin
clrscr;
Write('Masukkan banyak data kalian : ');readln(n);
writeln;
tot:=0;
for i:=1 to n do
begin
write('Masukkan data ke-',i,' kalian : ');readln(x[i]);
tot:=tot+x[i];
end;
mean:=tot/n;
writeln;
write('Rata-rata dari ',n,' data di atas adalah ',mean:8:2);
readln;
end.
Silakan dicoba.
Wah jadi inget masa lalu pak
Tahun 1997 saya mengcoding pascal 12K baris, untuk membuat aplikasi Soccer Manajer, Menulis buku “Pemrograman Game dengan Turbo Pascal” dan membuat Aplikasi Arm Robotic.
Apakah masih dipakai?? bukankah sudah tertinggal beberapa tahun oleh aplikasi semacam C, Java dkk?
Kalau sekarang mainan Arraynya pakai AS3 : https://www.wandah.org/membuat-game-rpg
Hahaha, betul bos. Untuk coding, pascal memang sudah tertinggal jauh. Namun, di matematika, bahasa pascal digunakan untuk membangun logika saja. Bahasanya paling sederhana dan yang paling dikuasai dosennya. (meh sinau liyane ora kober, red). Selanjutnya, untuk pemrograman yang sesungguhnya, kita menggunakan visual basic atau AppInventor untuk membuat aplikasi di android.