Syntax Sistem program prosedur garis 2 susun

Syntax: 
Uses wincrt;

Procedure Garis;

Begin

WriteLn('------------------------');

End;

Begin

Garis;

WriteLn('ASSALAMU ALAIKUM, Wr.Wb.');

Garis;

Garis;

writeln('WALAIKUM SALAM, Wr.Wb.');

Garis;

readln;

End.

copy syntax diatas ke dalam free pascal seperti di bawah ini :

Hasil :