Menghitung jumlah dan rata-rata array dengan pascal

Contoh Program untuk menghitung jumlah dan rata - rata array dengan pascal

Bahasa Pascal adalah Bahasa pemrograman yang terstruktur dan Seperti halnya dengan bahasa pemrograman tingkat tinggi lainnya, lebih mendekati bahasa manusia ( dalam hal ini adalah bahasa inggris) sehingga sangat cocok diterapkan di dunia pendidikan. sebagai salah satu bahasa pemrograman komputer yang tergolong dalam kelompok bahasa pemrograman yang terstruktur, struktur program pascal relatif sederhana.

Program memasukkan_data_ke_array;

Uses wincrt;

Var A : array  [ 1..3] of integer;

 N,i    : integer;

 jum   : integer;

 rta : real;

Begin

 Clrscr; n : = 0;

For i  : =1 to 3 do

Begin

  Write   ('masukan data ke',i,'= ');

  Readln  (A [i] );

  jum  : = jum + A [i];

  rta  : = jum / i;

End;

 writeln ('jumlah= ',jum);

 writeln ('rata-rata= ',rta : 0 : 0);

 end.