最简单的Delphi程序(控制台)

program Project1;        //在那个黑色的DOS窗口中显示‘OK’
{$APPTYPE CONSOLE}
//uses
//SysUtils; {这两行,在本程序中无用,如果带着程序大小是:40.5k; 注释掉程序是15k}
begin
  Writeln('ok');              //writeln代表在屏幕输出字符'OK'后加一个回车换行，如writeln（‘1+1=2’）键表示输出1+1=2之后加enter。
  Readln;                     ////等待输入，用户输入字符后按回车将会退出(如果没有这个函数，上面那句在屏幕输出字符后一闪就退出了)

end.