NuSinau

Uses Wincrt;
Var bilangan : array[1..50] of integer;
begin
ClrScr;
Bilangan[1]:=3;
Bilangan[2]:=29;
Bilangan[3]:=30;
Bilangan[4]:=31;
Bilangan[5]:=23;

writeln(‘nilai variabel bilangan ke 3=’,bilangan[3]);
readln;
end.

1. Erika Array
2. ARRAY PADA PASCAL
3. ARRAY DAN RECORD
4. Dani Array
5. Aljan Array dan Record
6. Contoh Array
7. Program Bilangan Genap
8. Hendra Array & Record
9. ARRAY / LARIK
10. Pandapotan Struktur Data