Prints out string with a newline.
with Ada.Text_IO;
procedure Put_Text is
use Ada.Text_IO;
S : String := "Hello";
begin
Put_Line ("Hello");
Put_Line (Standard_Output, "Hello");
Put_Line (Standard_Error, "Hello error");
Put_Li...
