program test var integer begin writeln Hello World end

1
2
3
4
5
program test;
var i:integer;
begin
writeln('Hello, World!');
end.