Page 66 - MODUL DASKOM 2020
P. 66
Modul 3 – Array, Record dan Pemrograman Modular 2020
Contoh Source code perintah Array:
Program Identitas_Pekerja;
Uses crt;
Var
Nama:Array[1..15]of string[40];
Departement:Array[1..15]of string[20];
Umur:Array[1..15]of string[30];
b,a:integer;
Begin
Write('Jumlah Pekerja :');readln(a);
For b:=1 to a do
Begin
Writeln('data ka ke-',b);
Write('Nama :');readln(Nama[b]);
Write('Departement :');readln(departement[b]);
Write('Umur :');readln(Umur[b]);
Writeln;
End;
clrscr;
For b:=1 to a do
Begin
Writeln('data pekerja ke-',b);
Writeln('Nama :',Nama[b]);
Writeln('Departement :',departement[b]);
Writeln('Umur :',Umur[b]);
End;
Readln;
End.
B. RECORD
Record adalah salah satu tipe data terstruktur. Dengan tipe data record, dapat dikumpulkan
beberapa item data yang masing-masing dapat mempunyai tipe data yang berbeda-beda (Jogiyanto.
1990:455). Record juga mirip dengan Array, dimana kita bisa membuat sebuah variabel yang
berisi berbagai elemen. Perbedaannya, record bisa menampung berbagai jenis tipe data, tidak hanya
1 tipe data seperti Array. Untuk membuat record di dalam pascal, kita bisa mendeklarasikannya di
bagian type
Contoh deklarasi :
Type
Nama_record=record
Variabel: tipe_data;
Variabel: tipe_data;
Variabel: tipe_data;
End;
a. Perintah Record
Terdapat dua perintah yang digunakan untuk record yaitu:
a) Statement Titik
Record yang menggunakan perintah tanda titik (.) untuk memanggil variabelnya.
Contoh Flowchart perintah Record Statement Titik :
Praktikum Dasar Komputer & Pemrograman 2020 III-64