>>115
with Ada.Text_IO;
procedure Hello is
begin
Ada.Text_IO.Put_Line("Hello, world!");
end Hello;

Pascalだと

program hello(input,output);
begin
writeln('Hello World!');
end.