用pascal输出语句编写下列图形程序 1 121 12321 12343211121123211234321
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/11 23:49:50
用pascal输出语句编写下列图形程序 1 121 12321 12343211121123211234321
用pascal输出语句编写下列图形程序 1 121 12321 1234321
1
121
12321
1234321
用pascal输出语句编写下列图形程序 1 121 12321 12343211121123211234321
方法一:当输入的数据不超过10的时候(因为超过10的话结果不一样了),可以用这样的方法实现:
var s:lint64;
i,n:integer;
begin
readln(n);
s:=0;
for i:=1 to n do
begin
s:=s*10+1;
writeln(' ':n-i+1,s*s);
end;
end.