1. Struktur Data Sederhana
Syntax:
program salam;
begin
writeln ('Assalamu Alaikum');
readln;
end.
Output:
 |
|
2.
Struktur
Data Terstruktur
Uses
crt;
Var
NamaHari
: array [1.. 7] of string;
p:
integer;
Begin
for
p:= 1 to 7 do
begin
Write
('masukkan NamaHari ke',p, ':');
readln(NamaHari[p]);
End;
writeln;
writeln('NamaHari
adalah :');
for
p:= 1 to 7 do
writeln('hari
ke', p,':', NamaHari[p]);
Readln;
end.
