在程序最后加一个readln;这样程序结束后要按回车才会结束。比如：program p1_1;vara,b,c:integer;beginread(a,b);c:=a+b;write(c);readln;end.
程序end之前加一个readln
