PROGRAM SRUKTUR DATA

PENGERTIAN ARRAY
Array adalah tipe data terstruktur yang terdiri dari sejumlah komponen-komponen yang mempunyai tipe sama. Komponen-komponen tersebut disebut sebagai komponen type, larik mempunyai jumlah komponen yang jumlahnya tetap. Banyaknya komponen dalam larik ditunjukkan oleh suatu index, dimana tiap komponen di array dapat diakses dengan menunjukkan nilai indexnya atau subskript. Array dapat bertipe data sederhana seperti byte, word, integer, real, bolean, char, string dan tipe data scalar atau subrange. Tipe larik mengartikan isi dari larik atau komponen- komponenya mempunyai nilai dengan tipe data tersebut.

PROGRAM

INPUT

program menghitung_rata_rata;
uses wincrt;
var nilai:array[1..10]of integer;
jml,rata:real;
begin
clrscr;
writeln('menghitung rata-rata nilai dari 10 data');
write('nilai1=');readln(nilai[1]);
write('nilai2=');readln(nilai[2]);
write('nilai3=');readln(nilai[3]);
write('nilai4=');readln(nilai[4]);
write('nilai5=');readln(nilai[5]);
write('nilai6=');readln(nilai[6]);
write('nilai7=');readln(nilai[7]);
write('nilai8=');readln(nilai[8]);
write('nilai9=');readln(nilai[9]);
write('nilai10=');readln(nilai[10]);
jml:=nilai[1]+nilai[2]+nilai[3]+nilai[4]+nilai[5]+nilai[6]+nilai[7]+nilai[8]+nilai[9]+nilai[10];
rata:=jml/10;
writeln;
writeln('jml =',jml:10:2);
writeln('rata-rata =',10:2);
end.

OUTPUT

program menghitung rata-rata
nilai 1=7
nilai 2=7
nilai 3=7
nilai 4=7
nilai 5=7
nilai 6=7
nilai 7=7
nilai 8=7
nilai 9=7
nilai 10=7
jml=70.00
rata-rata=7