用Delphi编一个程序
打印出 a
b a
c b a
b c b a

这样一个图形

是
a
b a
c b a
b c b a
还是
a
b a
c b a
d c b a
？

program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;

var i,j:integer;
s:string;
begin
s:='';
for i:=1 to 10 do
begin
s:=chr(ord('a')+i-1)+' '+s;
for j:=10 downto i-1 do
write(' ');
writeln(s);
end;
readln(s);
{ TODO -oUser -cConsole Main : Insert code here }
end.

方法很多，具体的要看你有什么样的要求了

delphi好像已经没人用了

不要这样说。

delphi本身还是很强大的。目前为止还没一个程序用其它语言能开发出来，而用Delphi开发不出来。