Net2/usr/src/share/doc/ps1/04.pascal/first.p

program first(output)
begin
	writeln('Hello, world!')
end.