pascal 输入n(n为正整数且n<50),输出n行由#和@字符组成的凹形图
pascal吧
全部回复
仅看楼主
level 2
未平复的心paul
楼主
输出n行由#和@字符组成的凹形图案。
【输入样例】
3
【输出样例】
# @
# # @ @
# # # @ @ @
2014年01月26日 04点01分
1
level 11
千方残光剑41
program chen;
var a,i,j:byte;
begin
readln(a);
for i:=1 to a do
begin
for j:=1 to i do write('#');
for j:=1 to (a-i)*2 do write(' ');
for j:=1 to i do write('@');
writeln;
end;
end.
2014年01月26日 08点01分
2
1