contoh program

Var A, B: integer;
Var C : real;
Var Z : string;
begin
A := 4;
B := 5;
C := A*B;
Z := "selamat siang";
writeln (A, B, C);
writeln (Z);
end.

hasil outputnya:
4520
selamat siang