ada/hello.adb · 515 字节 · 下载原文

-- 最小 Ada 程序：验证「声明区 + 输出」这条最短路。
--
-- 跑法（仓库根）：
--   dotnet run --project third_party/vml/VMLPrepares/AdaCompiler -- Examples/ada/hello.adb
--   dotnet scripts/vmlcli/bin/Release/net10.0/vmlcli.dll Examples/ada/hello.vml

with Ada.Text_IO; use Ada.Text_IO;

procedure Hello is
   Name : String := "Ada";
   N    : Integer := 3;
begin
   Put_Line("Hello, world!");
   Put_Line("Hello, " & Name & "!");
   Put_Line("N * N = " & Integer'Image(N * N));
end Hello;