Ada 如何打印日历日期

我正在使用Gnat（旧的ada95编译器），打印日期时遇到问题。
我说：（用Ada.日历）

日期：日历。时间
日期：=日历时间（年=>2010，月=>1，日=>10）

现在我试着把它打印出来-

放线（“年：&年（Cdate）”Img

---

但是我没有做到…

您只提供了程序片段，因此很难判断您实际编写了什么，并且正在尝试运行什么。你没有指出它是如何工作的。它没有编译吗？它是否编译但没有正确运行

如果片段按原样从代码中剪切并粘贴到此处，则可能会出现语法错误

下面是一个完全可以工作的程序，它可以完成您想要的功能：

with Calendar;
with Text_IO; use Text_IO;

procedure Cdate_Test is

   Cdate : Calendar.Time;

begin
   Cdate := Calendar.Time_Of(Year => 2010, Month => 1, Day => 10);
   Put_Line("Year: " & Calendar.Year(Cdate)'Img);
end Cdate_Test;

---

这是使用Gnat编译和运行的，虽然您可能正在使用它的旧版本，但它本身并不是一个“旧编译器”，它的最新/最好的免费版本随时可用。

您得到了什么输出？“年份：”仅此而已？年份只是为了测试它是否有效。最终它将是年、月、日。