如何在ada83环境中打印整数

我想在Ada 83中打印整数。目前我只使用“with Text_IO”和“use Text_IO”。我不想使用Integer'Image选项打印。我想在ada83中使用整数\文本\ IO。请帮我解释一下语法

我正在使用以下代码：

 with Text_IO;
 use Text_IO;
 i: INTEGER :=1; 
 package Int_IO is new Integer_IO(INTEGER);
 use Int_IO; put(i);

---

我在“Num”的实例化中遇到“expect signed integer type”错误。

下面的编译示例应该会有所帮助

但是，当在StackOverflow（或网络上的任何地方）上发布问题时，请向我们展示您实际尝试过的代码。您提供的示例与编译不太接近（第3行失败，预期编译单元为

），这使得我们很难找到帮助您的方法

如果尝试使用错误的类型（例如，
Float
）实例化
Text\u IO
，则在“Num”的实例化中会得到
expect有符号整数类型

到目前为止你试过什么吗？请提供一些代码示例；使用文本输入法；i：整数：=1；包Int_IO是新的整数（Integer）；使用Int_IO；付诸表决（i）；我在“Num”的实例化中得到了“expect signed integer type”错误。我假设在那里的某个地方有一些额外的行，例如
过程
或
函数
声明，以及
开始
？假设有，并且您已经将上述语句放在正确的位置，它应该可以正常工作，除非您已经做了类似于重新定义INTEGER的操作
with Text_IO;
procedure Integer_IO_Demo is
   package Int_IO is new Text_IO.Integer_IO (Integer);
begin
   for J in 5 .. 10 loop
      Int_IO.Put (J);
      Text_IO.New_Line;
   end loop;
end Integer_IO_Demo;