ARRAY DIMENSI 1

Pengertian Array Satu Dimensi

         Array satu dimensi yaitu kumpulan elemen + elemen identik yang hanya terdiri dari satu baris atau hanya satu kolom alamat penyimpanan data (indeks). Elemen + elemen tersebut memiliki tipe data yang sama, tetapi isi dari elemen tersebut boleh berbeda. Dan contoh nya seperti gambar di bawah ini.

Gambar progam diatas termasuk kategori Array Satu Dimensi, kenapa ? Karena progam tersebut hanya terdiri satu baris yang memiliki tipe yang sama namun isi dari elemen tersebut yang berbeda.

Dan ini script koding nya :

program Array_dimensi_1;
{$APPTYPE CONSOLE}
uses
  SysUtils;

Var
      tot,i,jum:integer;
      rata:real;
      nilai:array[1..10]of integer;
begin
  i:=1;tot:=0;
  writeln('Nama : Maisirotul Rizka');
  writeln('Nim  : 114224022');
  writeln('--------------------------');
  writeln('---------------------=----');
  writeln;
  writeln('   ========================');
  writeln('    Jumlah Rata-Rata Nilai');
  writeln('   ========================');
  writeln;
  write('Masukkan Jumlah Data= ');
  readln(jum);
  while i<=jum do
begin
  write('Masukkan nilai ke ', i);
  readln(nilai [i]);
  tot:= tot+nilai [i];
  i:= i+1;
end;
  rata:=tot/jum;
  writeln;
  writeln('Rata-Rata nilai= ',rata:6:1);
  writeln;
readln;
end.


Selamat mencoba.. ^^