Question

pascal语言中，for循环的问题

用for循环打印出 那位大哥来帮帮忙
1
222
33333
4444444
555555555
1前面有4个空格
222前面3个
33333前面有2个
4444444前面1个
555555555前面没有空格

Answer 1

var i,j:longint;
begin
for i:=1 to 5 do begin
for j:=1 to 5-i do write(' ');
for j:=1 to 2*i-1 do write(i);
writeln;
end;
end.

希望对你有帮助