Contoh : program pascal dengan menggunakan Procedure
program tunjangan; uses wincrt; var nm,jab,no :string; gaj,ti,ta,tgaj:real; stat,jmlank :integer; procedure input; begin
Contoh : program pascal dengan menggunakan Procedure
program tunjangan; uses wincrt; var nm,jab,no :string; gaj,ti,ta,tgaj:real; stat,jmlank :integer; procedure input; begin
contoh : listing program pascal dengan menggunakan fungsi..
program tunjangan; uses wincrt; var nm,jab,no :string; gaj,ti,ta,tgaj:real; stat,jmlank :integer; function gajibersih (gaji,tunjangan_anak,tunjangan_istri,totalgaji :real):real; begin gajibersih:=gaji+tunjangan_anak+tunjangan_istri; end;
begin end.Penjelasan: (tanda // slash ganda artinya adalah komentar/keterangan)
begin // instruksi untuk mengawali program Pascal
end. // instruksi untuk mengakhiri program Pascal diikuti Operator Akhir Program