Question

关于pascal字母金字塔问题，帮我看看程序那个地方不对，在线等。

题目：2、 输入一列图形（字母金字塔）
a
a b
a b c
. .
a b c …… y z

program jinzita;
var i,j,m:integer;
begin
for i:=0 to 25 do
begin
write('a':(26-i));
m:=ord('a')+1;
for j:=0 to i do;
begin
write(chr(m):2);
m:=m+1;
end;
writeln;
end;
end.

Answer 1

把 for j:=0 to i do; 后面的分号去掉