一个小程序问题（在线急等）

[lishunxp]

1－81 81个数，要求排成九×九的方阵，而且横，竖，对角线相加之和都等于369
有知道怎么做的，请各位不令赐教，在下感激不进！！！！

[老猿的书房]

将1放在第一行中间一列
以后的每个数,在1的基础上列数加1,行数减1,如列数或行数为9,回绕为1
如果指定的单元格已经有数,则将新数放在他的前一位数的下方,例如,在按照这个法子排3*3方阵时,到4时,4的格子已经被1占据,则将4放在3的下方

谭浩强的<C程序设计>里有这个题,网上提供的解法也不少,去搜一下了

[lishunxp]

感激不进

47 58 69 80 1 12 23
57 68 79 9 11 22 33
67 78 8 10 21 32 43
77 7 18 20 31 42 53
6 17 19 30 41 52 63
16 27 29 40 51 62 64
26 28 39 50 61 72 74
36 38 49 60 71 73 3
37 48 59 70 81 2 78

结果对吗？

[老猿的书房]

不对啊老大，怎么只有七列

[boomit]

这好象属于算法问题，呵。。

[lishunxp]

朋友给说的
看来是搞错了

[lz_zxf]

这是一个算法
47 58 69 80 1 12 23 34 45
57 68 79 9 11 22 33 44 46
67 78 8 10 21 32 43 54 56
77 7 18 20 31 42 53 55 66
6 17 19 30 41 52 63 65 76
16 27 29 40 51 62 64 75 5
26 28 39 50 61 72 74 4 15
36 38 49 60 71 73 3 14 25
37 48 59 70 81 2 13 24 35

[dfwxj]

FishOfThink(旅者) 的算法是对的，代码如下：

DIME a(9,9)
a=0
x=1
Y=5
FOR i=1 to 81
DO while a(x,y)>0
x=x-1
Y=y+2
IF x=0
x=9
ENDI
IF y>9
Y=y-9
ENDI
ENDD
a(x,y)=i
x=x+1
Y=y-1
IF x>9
x=x-9
ENDI
IF y=0
Y=9
ENDI
ENDF
for i=1 to 9
for j=1 to 9
?? a(i,j)
endf
?
endf
retu

[lishunxp]

16 81 79 78 77 13 12 11 2
76 28 65 62 61 26 27 18 6
15 23 36 53 51 35 30 59 7
74 24 50 40 45 38 32 58 8
9 25 33 39 41 43 49 57 73
10 60 34 44 37 42 48 22 72
14 63 52 29 31 47 46 19 68
15 64 17 20 21 56 55 54 67
80 1 3 4 5 69 70 71 66

这个结果并不是按照上面的算法做出来的
不知道可不可以

[hkhsd]

能把算法详细说说吗

[老猿的书房]

不管什么方法,你自己加一下,检验对了就可以啊,你是什么方法做的,可以说么?

[mgan]

算法和 1-9
9个数相加和等于15 一样的
只不过这里多了几个数字而已啊
看看是不是 啊