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

---

加 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.

---