2015年11月10日
偶数阶幻方
摘要： program magic; var i,j,k,n,x,y,m:longint; a:array[1..100,1..100] of longint;procedure print;begin for i:=1 to n do begin for j:=1 to n do write(a[i... 阅读全文
posted @ 2015-11-10 23:14 G-T- 阅读(126) 评论(0) 推荐(0)