Ada I / O：Put_Line在Get_Line之后无法正常工作

作者: afs-loliaholic
发布时间: 2024-12-15 11:55:21 (3月前)
转自：

        我正在尝试在Ada中进行基本的I / O，但是关于这个的文档信息量不大（除非我去错了地方）。在下面的块中，我试图测试字符串追加和输出，...

3 条回复

0#
回复此人
敢嫁就敢娶 | 2019-08-31 10-32
usrIn
是一个
String(1..80)
，即一个80个字符的数组。

这一行：
```
    
      Append(appendString,usrIn);
</code>
  
```
将所有80个字符（大部分可能是垃圾）附加到 appendString 。这是什么的 last 论证 Get_Line 是为了。更换 userIn 通过 userIn(userIn’First .. last) 。这是一个片段，只包含由。读取的字符 Get_Line 呼叫。
编辑
1#
回复此人
無口君 | 2019-08-31 10-32
如果您正在使用Ada 2005或更高版本的版本进行编译，您还可以使用函数形式

Get_Line

：
```
    
      declare
    usrIn : constant String := Get_Line;
begin
    Append(appendString,usrIn);
end;
</code>
  
```
编辑

登录后才能参与评论