Put_Line

使用换行符打印字符串。

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_Line (S & " World");
end;

结果

Hello
Hello
Hello error
Hello World