周网通 发表于 昨天 15:45

如果楼上的通项公式是正确的话,
那么123456789在
第15461行253列

iseemu2009 发表于 昨天 16:01

本帖最后由 iseemu2009 于 2025-5-20 16:05 编辑

你50#的这个表格可用下面的程序画出:
Clear["`*"]
n = 13;   (*输入n行的值*)
a = Table <> "/" <> ToString, {i, n}, {j, n}];
b = Range;
c = Join[{#} & /@ b, # & /@ a, 2];
d = Join[{Style["n/d"]}, Range];
e = Join[{d}, c];
Grid // Text
页: 1 2 3 4 5 [6]
查看完整版本: 一道趣题