楼上确实是Pascal的程序,
System.pas是FreePascal的基本库,Delphi应该不会用的,除非你用Delphi做字符界面的程序(Console)。
program PrintLetters(input, output);
uses CRT;
const letters='abcdefghijklmnopqrstuvwxyz';
space= ' ';
var i, j: integer;
begin
ClrScr;
for i:=1 to 24 do // 'a' to 't', 26 for 'z'
begin
write(copy(space, 1, 30-i)); // print some spaces
for j:=1 to i do write(letters[j], ' ');
writeln; //new line
end;
readln; // press Enter to exit;
end.