example

program hello;
var c : char;
var i : integer;
var f : real;
var s : string;
begin
  i := 1;
  writeLn('hello')
end.