设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 3020|回复: 9
打印 上一主题 下一主题

[Access本身] 【Access小品】N阶幻方计算器

[复制链接]
跳转到指定楼层
1#
发表于 2011-8-21 21:40:20 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 todaynew 于 2011-8-22 05:54 编辑

  幻方者,以矩形之阵,填之以数,达之以行、列、对角之和,均为一定数者也。  
  

  宋朝便有人研究过九宫格填数问题,九宫格发展出N阶后,好事者名之曰“幻方”。时至今日,很高阶的幻方问题似乎还有些没有完全解决。不过低阶的幻方还是有规律可循的。幻方大体分为三类,其一是奇阶幻方,其二是双偶幻方,其三是单偶幻方。其中前两者比较容易,主要的是单偶幻方处理起来很麻烦,也有一些高阶的单偶幻方还没有找到规律。



  今日见论坛有版友似水流年同志在做这方面的实例(9阶以下),便决定写一个更为通用的示例,解决N阶幻方问题(部分高阶的也许计算不对)。



本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
发表于 2011-8-21 22:18:45 | 只看该作者
本帖最后由 wang1950317 于 2011-8-21 22:20 编辑

todaynew老师越玩越奇啦!不懂!看看!
3#
发表于 2011-8-21 22:36:08 | 只看该作者
本帖最后由 roych 于 2011-8-21 22:37 编辑

老汉斑竹,不如整一个数独玩玩?

点击这里给我发消息

4#
发表于 2011-8-22 09:31:28 | 只看该作者
我也没看懂,一看数字就头晕。
5#
 楼主| 发表于 2011-8-22 10:25:09 | 只看该作者
同志们,不至于吧?这可是小学奥数常见的问题。
6#
发表于 2011-8-22 10:50:34 | 只看该作者
谢谢分享
7#
 楼主| 发表于 2011-8-22 20:59:37 | 只看该作者
本帖最后由 todaynew 于 2011-8-22 21:09 编辑

奇阶幻方构造法:
1、在第一行的中间单元格填1;
2、顺序向右上一个连续填数:
(1)如果超出填数区域,则折转到另一边底部单元格填数;
(2)如果不超出填数区域,则在右上一格填数;如果右上一个已经填过数字,则在本单元格下一格填数。
(3)填数区域的右上脚单元格填数后,向下移一个填数。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
8#
 楼主| 发表于 2011-8-22 21:00:30 | 只看该作者
本帖最后由 todaynew 于 2011-8-22 21:10 编辑
todaynew 发表于 2011-8-22 20:59
奇阶幻方构造法:


双偶幻方构造法:
1、顺序填写自然数;
2、找到所有4*4区域的对角线并标示出来;
3、所有对角线上的数据按照中心对称调换。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
9#
 楼主| 发表于 2011-8-22 21:19:00 | 只看该作者
本帖最后由 todaynew 于 2011-8-22 21:26 编辑
todaynew 发表于 2011-8-22 21:00
双偶幻方构造法:
1、顺序填写自然数;
2、找到所有4*4区域的对角线并标示出来;


单偶幻方构造法:
1、将单偶幻方划分为四个象限,分别按照奇阶幻方构造法填数。
四个象限规律为:

左上(1象限)最小  右上(2象限)次大
左下(3象限)最大  右下(4象限)次小

2、计算K值。
4k+2=m   (m为阶数);14阶时,k=3

3、标识调换区域
(1)1、3象限在左侧上下区域标识出4个k*K区域
(2)1、3象限中间行从k*k相邻的右侧标识宽度为k的单元格
(3)2、4象限从中间列开始向左标识出上下两个k-1宽度的区域

4、1、2象限标识出得各区域中的数据,与3、4象限对应区域的数据对换。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

点击这里给我发消息

10#
发表于 2011-8-22 21:54:56 | 只看该作者
重新下载了新版
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2025-1-11 05:47 , Processed in 0.098519 second(s), 36 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表