![CONTOH ARRAY
program Khasus1;
uses wincrt;
var
nama : array [1..3] of string[30];
alamat : array [1..3] of string[10];
umur : array [1..3] of integer;
i : integer;
begin
nama[1] := 'Yusri';
alamat[1] := 'Kuta Blang';
umur[1] := 20;
nama[2] := 'Ikhsan';
alamat[2] := 'Matang ';
umur[2] := 20;
nama[3] := 'Fauzan';
alamat[3] := 'Bireuen';
umur[3] := 20;](https://image.slidesharecdn.com/recorddanarray-160106085629/85/Record-dan-array-4-320.jpg)
![For i := 1 to 3 do
Begin
writeln('nama nya adalah : ', nama[i]);
writeln('alamat nya adalah : ', alamat[i]);
writeln('umur nya adalah : ', umur[i]);
writeln(' ');
End;
end.](https://image.slidesharecdn.com/recorddanarray-160106085629/85/Record-dan-array-5-320.jpg)
More Related Content
Similar to Record dan array (20)
More from ojanfauzan09 (6)
Recently uploaded (20)
Record dan array
- 1. ARRAY DAN RECORD Nama : FAUZAN Npm : 1405020150 Unit : E
- 2. Array Dan Record A.Pengertian Array Array adalah sekumpulan variabel yang memiliki tipe data yang sama dan dinyatakan dengan nama yang sama. Array merupakan konsep yang penting dalam pemrograman, karna array memungkinkan untuk menyimpan data maupun referensi objek dalam jumlah banyak dan terindeks. Array menggunakan indeks integer untuk menentukan urutan elemen-elemennya, dimana elemen pertamanya dimulai dari indeks 0,elemen kedua memiliki indeks 1, dan seterusnya.
- 3. B.Pengertian record Sebuah record rekaman disusun oleh beberapa field. Tiap field berisi data dari tipe dasar / bentukan tertentu. Record mempunyai kelebihan untuk menyimpan suatu sekumpulan elemen data yang berbeda-beda tipenya (di banding array).
- 4. CONTOH ARRAY program Khasus1; uses wincrt; var nama : array [1..3] of string[30]; alamat : array [1..3] of string[10]; umur : array [1..3] of integer; i : integer; begin nama[1] := 'Yusri'; alamat[1] := 'Kuta Blang'; umur[1] := 20; nama[2] := 'Ikhsan'; alamat[2] := 'Matang '; umur[2] := 20; nama[3] := 'Fauzan'; alamat[3] := 'Bireuen'; umur[3] := 20;
- 5. For i := 1 to 3 do Begin writeln('nama nya adalah : ', nama[i]); writeln('alamat nya adalah : ', alamat[i]); writeln('umur nya adalah : ', umur[i]); writeln(' '); End; end.