Delphi 编写控制台程序(无Form)

打开Delphi，在新建中，选择Console Application，就可以写代码
控制台程序是以program 开头，并有编译标识{$APPTYPE CONSOLE}用以标识程序是控制台程序；通常情况下只需要引用SysUtils一个单元就可以；
如下是一个简单的事例，可以编写一个控制台程序

program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;
var
I,J:Integer;
begin
try
for I := 1 to 9 do
begin
for J := 1 to I do
begin
write(Format('%2d*%2d=%2d',[J,I,I*J]));
end;
Writeln;
end;
Readln;
except
on E:Exception do
Writeln(E.Classname, ': ', E.Message);
end;
end.