小编Cha*_*ika的帖子

我的简单Ada程序无法执行下一个命令,但是在构建和运行过程中没有关系

抱歉,我想问有关 Ada 语言的问题。首先,我想解释一下,我第一次学习了 Ada 语言,我正在尝试制作一个简单的程序,就像我所附的那样 -> https://pastebin.com/Z1CWUSQv

with Ada.Text_IO;
use Ada.Text_IO;

procedure Main is
Name : STRING (1..50);

begin
Put("Hallo, whats your name?");
Get(Name);

if (Name = "William") then
   Put_Line ("Hai william");
elsif (Name = "Erick") then
   Put_Line ("Hai erick");
else
   Put_Line ("i dont know, who are you!");
   end if;
end Main;
Run Code Online (Sandbox Code Playgroud)

https://i.stack.imgur.com/1fTLR.png 所以,我的问题是:当我写完代码时,我进行了构建并且成功了,之后我运行了程序,输出看起来像这个:

  • 你好你叫什么名字?(这是输出)
  • 埃里克(这是我的输入)

完成后,我按下 Enter 键,之后没有任何事情发生,程序不执行下一个命令(我做了一个 if / else 命令)

我正在使用 Gnat Studio IDE 或在线编译器 --> https://www.tutorialspoint.com/compile_ada_online.php,那么我的程序有什么问题?是否有任何我需要安装的工具等?请知道我很难找到有关此问题的参考资料。我希望所有阅读本文的人都可以帮助我。(抱歉我的英语不好)

~谢谢

ada

2
推荐指数
1
解决办法
75
查看次数

标签 统计

ada ×1