大师作文网pascal二维数组矩阵.最好每一步都有过程.
来源：学生作业帮 编辑：大师作文网作业帮 分类：综合作业 时间：2024/11/17 11:10:51
pascal二维数组矩阵.最好每一步都有过程.
输入：5
输出： 1 2 3 4 5
6 7 8 9 10
11 12 13 14 15
16 17 18 19 20
21 22 23 24 25
场宽是3
输入：5
输出： 1 2 3 4 5
6 7 8 9 10
11 12 13 14 15
16 17 18 19 20
21 22 23 24 25
场宽是3
var
i,n:integer;
begin
readln(n);
for i:=1 to n*n do
if i mod n=0 then writeln(i:3)
else write(i:3);
end.
再问： 可以再加点过程么？O(∩_∩)O谢谢！ for i:=1 to n*n do
if i mod n=0 then writeln(i:3)
else write(i:3);
这几句再说明一下
再答： 从题目推测，是要输出方阵，方阵的阶数为n，则方阵的元素个数为n×n，方阵中的元素是按顺序排列的自然数列。
题目的关键是当输出到第n列时要换行，程序中用“ if i mod n=0 then writeln(i:3)
”实现换行。
i,n:integer;
begin
readln(n);
for i:=1 to n*n do
if i mod n=0 then writeln(i:3)
else write(i:3);
end.
再问： 可以再加点过程么？O(∩_∩)O谢谢！ for i:=1 to n*n do
if i mod n=0 then writeln(i:3)
else write(i:3);
这几句再说明一下
再答： 从题目推测，是要输出方阵，方阵的阶数为n，则方阵的元素个数为n×n，方阵中的元素是按顺序排列的自然数列。
题目的关键是当输出到第n列时要换行，程序中用“ if i mod n=0 then writeln(i:3)
”实现换行。