作业帮 > 综合 > 作业

用pascal输出语句编写下列图形程序 1 121 12321 1234321

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/17 07:48:03
用pascal输出语句编写下列图形程序 1 121 12321 1234321
1
121
12321
1234321
方法一:当输入的数据不超过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.