Page 82 - Modul PDKP 20

Modul 3 – Array, Record dan Pemograman 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 & Pemograman 2020 III-65