The first of a few examples I'd like to contribute.
with Ada.Text_IO; procedure hello_world is begin -- Main Program Ada.Text_IO.put("Hello World!"); end hello_world;