Pascal字母三角pascal输出 a a b a b c a b c d …… …… a b c ………… x y z(26行)没打好,是一个三角形

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/08 01:42:55
Pascal字母三角pascal输出           a          a b         a b c        a b c d       ……    ……  a b c ………… x y z(26行)没打好,是一个三角形

Pascal字母三角pascal输出 a a b a b c a b c d …… …… a b c ………… x y z(26行)没打好,是一个三角形
Pascal字母三角
pascal输出
a
a b
a b c
a b c d
…… ……
a b c ………… x y z
(26行)
没打好,是一个三角形

Pascal字母三角pascal输出 a a b a b c a b c d …… …… a b c ………… x y z(26行)没打好,是一个三角形
program homework2(input,output);
var
i,j:integer;
ch:char;
begin
for i:=1 to 26 do
begin
write(' ':26-i);
for j:=1 to i do
begin
ch:=chr(j+ord('a')-1);
write(ch,' ');
end;
writeln;
end;
end.