为什么delphi的控制台应用程序运行后闪一下就没了?

2024-12-18 14:05:55
推荐回答(1个)
回答1:

加 Readln;语句
------------------------

以下是一个源码实例:

program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;

var
a,b,c:integer;

begin
{ TODO -oUser -cConsole Main : Insert code here }
Write('输入 a : ');
Readln(a);
Write('输入 b : ');
Readln(b);
c := a+b ;
Writeln('a+b=: ',c);
Writeln('按 退出');
Readln;{ 加上这句话即可}

end.