Question

delphi---控制台程序的问题！

小弟真是很菜，连这么简单的一个控制台都弄不来了，向各位大虾请教。下面的的一个console application:

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils;
var
a:integer;
begin
writeln('请你输入一个整数，让我判断是不是偶数！');
readln(a);
if a=0 then
writeln('你输入的数为0,这既不是奇数也不是偶数!')
else if a mod 2=0 then
writeln('你输入的数是一个偶数!')
else
writeln('你输入的数是一个奇数');
{ TODO -oUser -cConsole Main : Insert code here }
end.

就是一个很简单的判断所输入数字是奇数还是偶数，调试的时候，不知道咋的，提示我输入一个整数，我输入后，一回车，为什么看不到结果了，窗口只是一闪，就给我关了？？？既然能够通过编译，程序本身应该没问题，这delphi怎么调试就这么难啊，不像VC里那样。。。应该怎么调试才能看到程序的结果啊？

Answer 1

请你在程序最后的“end.”之前加上一行：
readln;