Pascal (gpc 20070904) sample

Here is a sample Pascal code:

program HelloWorld;
begin
  writeln('Hello, World!');
end.

This code will output "Hello, World!" when executed.