有没有人想过怎么用计算机来实现24点

hzzh · 发表于 2004-5-8 17:31:00

这个题目不容易呢，好多高手都出马了，不错不错，不佩服的不行。来了点好奇心，对游侠无极限的程序运行了一下算法还没有看懂，为什么结果会都是重复的？ “ 请输入4个数（用回车或者空格分开）：5 5 8 8 5*5-8/8 5*5-8/8 5*5-8/8 5*5-8/8 总计4个式子 “ 另外程序有一点点小错误： ” int EnumFormula(int *FormulaNum,int num,int sum) { int result = 0; int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 int *Formula = (int*)calloc(num*2-1,sizeof(int)); //波兰表达式储存空间 int *temp = (int*)calloc(num*2,sizeof(int)); //波兰表达式的代号表示空间 int i,j; for(i=0;i = FormulaNum; //载入进行穷举的操作数 1 Q8 Q1 m/ e4 Z8 u* t% L for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 * W6 I+ s. k' T. `' X& l “" K" w: {- p$ d# p2 n2 | 前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组8 m3 o9 k3 u0 C$ S- f) o% [ 后来二句： % g6 \- i$ ^2 e5 U for(i=0;i = FormulaNum; //载入进行穷举的操作数 - a% H) o4 v+ X8 }/ x for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号5 x( X% E( K5 ~ 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了2 V( \" ^. l# w

唐明 · 发表于 2004-5-8 18:11:00

‘最后一次发代码

" b& w$ }9 l; [ ' ]7 R$ D2 r9 g# S0 U

2 k+ c, d Q- p1 V- p# s 8 _: ^6 n% Z9 E3 C4 r m5 W9 r$ a , }. e) j: E0 s, H B3 D% `4 D. `9 S9 [0 P 5 o6 f& u5 S. Y3 t& g3 y7 S+ O Y

o$ S/ {, ?% b9 V! P z. k + f6 `( o% Z/ q$ U$ E- d5 |8 S

[此贴子已经被作者于2004-5-8 18:20:59编辑过]

yzhlinux · 发表于 2004-5-8 18:42:00

佩服佩服，不佩服不行了，
代码越来越工整，注释越来越详细实用，
真是长江后浪推前浪啊，前浪死在沙滩上

游侠无极限 · 发表于 2004-5-8 21:11:00

以下是引用hzzh在2004-5-8 17:31:09的发言：' x& j6 k% y2 E 这个题目不容易呢，好多高手都出马了，不错不错，不佩服的不行。7 i! S- o. w. h+ K 来了点好奇心，对游侠无极限的程序运行了一下 # S9 |# u1 n* c* h/ Q 算法还没有看懂，为什么结果会都是重复的？+ c, _9 @( O9 v Z5 O! k “/ Z1 w- L* ?; D* q6 Z 请输入4个数（用回车或者空格分开）：5 5 8 8 ( J6 C/ l7 I- q4 h( t5 f3 l 5*5-8/80 o( _- S" O3 e8 ^+ M 5*5-8/8; G. [$ B$ J7 T$ L 5*5-8/8 , G1 O' f7 M/ a. o: M 5*5-8/84 G t( y; U" I, `2 M; I 总计4个式子 6 @$ X Z7 h+ d q! G8 b “ * ^% g7 e9 g& k6 G" @3 f! o 另外程序有一点点小错误：: [$ t. V, ~& F, m3 I8 _: F; y6 p m( V ” / a& H. [; n C- x: \1 F* Y int EnumFormula(int *FormulaNum,int num,int sum) 3 }* g, b0 h) T/ E7 f {3 _/ l/ ?+ b/ O# i9 L0 e- E% o int result = 0;5 r: M2 }/ T6 d3 f. l- i int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组- n" a- N) k2 w D+ t% n3 @ int *Formula = (int*)calloc(num*2-1,sizeof(int)); //波兰表达式储存空间% H8 |; W3 [1 W1 Y' W7 {2 R w int *temp = (int*)calloc(num*2,sizeof(int)); //波兰表达式的代号表示空间 8 s8 y) k6 Q! u O* z! [0 H+ [2 j int i,j; * x7 I; j3 ?) z; @2 x# K for(i=0;i = FormulaNum; //载入进行穷举的操作数 for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 7 D' w- y5 ?- {3 s “ : p9 T0 Z' b% U7 L 前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组6 O2 h) l7 k& \. y5 i# M4 f 后来二句： ( w% Q% ]# h0 }$ a2 B for(i=0;i = FormulaNum; //载入进行穷举的操作数 : C' @3 \% v3 O% o( W for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号( _ I( u, \6 `/ H# V8 o Z 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了8 \' d( r& |$ T5 y$ M

# a( T4 M) s7 U! a/ F$ l s . I8 u, b* M) g6 h# j真是太感谢了，想必释放错误是由于这个越界啊 : b# c# }2 Q4 {" n至于重复，其实是这样的： 8 a% |1 l( _ V* `你输入的 5 5 8 8，在穷举中，第一个5和第二个5不等价，同样第三个8和第四个8不等价，所以结果是 ( l# B0 Y0 B' V' Q1 b5(1)*5(2)-8(3)/8(4) 0 U5 P: u+ A2 f# ] W5(2)*5(1)-8(3)/8(4)5 \, _. g# x# j8 D8 t( y+ r3 w$ o6 | 5(1)*5(2)-8(4)/8(3)& O& p3 k% P7 a3 ^6 }0 g 5(2)*5(1)-8(4)/8(3) 3 D1 n% t" @+ t

唐明 · 发表于 2004-5-9 12:21:00

给游侠无极限定义操作数: v1,v2,v3,v4 就是4个数字运算次序:px,p1,p2,p3,px 计算的顺序，比如9*9*9*9是6,1,2,3,6 || 5*(8+9)/3是6,3,1,2,6 等等运算

x,o1,o2,o3,ox 进行的计算操作数串: s1,s2,s3,s4 特征马: v1-o1-v2-v12-o2-v3-v123-o3-v4 这是按照p1,p2,p3的次序且v1>v2,v12>v3,v123>v4 次序px=6 运算ox="=" 1)次序为 : "()" > "/" > "*" > "-" > "+" 相应级别: 5 4 3 1 0 2)检查前面 / 后面的运算，如果与现在将要进行的相同则继续检查前"面"生成的特征马的"后"面一个操作数/"后"面生成的特征马的"前"面一个操作数，"前"面生成的特征马的"后"面一个操作数>现在的"后"操作数 / "后"面生成的特征马的"前"面一个操作数>现在的"前"操作数，则跳出运算（5月13日注：这规则是在前后都有计算过的运算时） 3)"+"/"*"作运算时"前"面的运算级别与现在将要进行的"相"同则"前"面的运算的"后"操作数必须是>=现在将要进行运算的"后"操作数,如果不符合则跳出运算 4.1)"/" / "*"检查前/后面的运算，小雨当前运算级别超过1，则在相应操作数串上+（） 4.2)"/"检查"后"面的运算级别<=4，则在相应操作数串上+（）如果认为/(a/b)=/b*a /(a*b)=/a/b 则"后"面的运算级别=4或=3跳出运算 4.3)"*"检查"后"面的运算级别<3或=4，则在相应操作数串上+（） 4.4)"-"检查"后"面的运算级别<=1，则在相应操作数串上+（）如果认为-(a-b)=-b+a -(a+b)=-b-a 则"后"面的运算级别=1或=0跳出运算 5)第2,3次运算结束时这次运算的运算代替次序在他之前的运算的运算 6)王成一个表达时的计算时应当分别保存特征马和最总的操作数串(完整的表达式串)在一个容器之中，已经存在相同的特征马则应该放弃现在的特征马和最总的操作数串(完整的表达式串) 7)如果认为*1和/1是相同的则两者只能选一，（禁止(当...时跳出运算)*/1或/1中的一个）或（*/1或/1中的一个生成特征妈时转换为对方） 8.1)为了避免6+3+2和6+（3+2）6+3-2和6+（3-2）...重复，"+"后面有"+"/"-"跳出运算 8.2)为了避免6*3*2和6*（3*2）6*3/2和6*（3/2）...重复，"*"后面有"*" / "/"跳出运算一个特征马的存储形式:char[n,7]={{v1,o1,v2,o2,v3,o3,v4},...} 这里所有跳出运算都可以通过改变前后的特征马而不跳出运算，但是那样很麻烦这个产生特真马的前提就是我的代码（规则是比较乱的）的前提，这里只是描述的相对清楚，特征马就是我的代码中允许的表达时的计算过程，所以我的这个铁自可能是多余的

**************************************** 例子1: 次序左右的6 运算左右的= 省略了 **************************************** 操作数: v1,v2,v3,v4 运算次序: p1,p2,p3 运算: o1,o2,o3 操作数串: v1,v2,v3,v4 下面是计算原操作数: v1,v2,v3,v4 一次运算: v12 ,v3,v4 运算次序: px,p2,p3 运算: ox,o2,o3 操作数串: v1p1v2,v3,v4,v4 二次运算: v123,v4 运算次序: px,px,p3 运算: ox,ox,o3 操作数串: v1p1v2p2v3,v4,v4,v4 三次运算: v1234 运算次序: px,px,px 运算: ox,ox,ox 操作数串: v1p1v2p2v3p3v4,v4,v4,v4 下面是特征马 v1-o1-v2-v12-o2-v3-v123-o3-v4 这是按照p1,p2,p3的次序且v1>v2,v12>v3,v123>v4 最总的操作数串(完整的表达式串) v1p1v2p2v3p3v4 **************************************** **************************************** 例子1的实例: 次序左右的6 运算左右的= 省略了 **************************************** 操作数: 2 ,2 ,3 ,2 运算次序: 1 ,2 ,3 运算: + ,* ,* 操作数串: 2 ,2 ,2 ,2 就是: (2+2)*3*2 下面是计算原操作数: 2 ,2 ,3 ,2 一次运算: 4 ,3 ,2 运算次序: 6 ,2 ,3 运算: + ,* ,* 生成2-+-2 操作数串: 2+2,3,2,2 二次运算: 12,2 运算次序: 6 ,6 ,3 运算: * ,* ,* 生成4-*-3 操作数串: (2+2)*3,2,22 加上括号三次运算: 24 运算次序: 6 ,6 ,6 运算: * ,* ,* 生成12-*-2 操作数串: (2+2)*3*2,2,2,2 下面是特征马 2-+-2-4-*-3-12-*-2 按照1，2，3(就是次序)的顺序最总的操作数串(完整的表达式串) (2+2)*3*2 **************************************** 再比如2*(2+2)*3 特征马 2-+-2-?-?-?-?-?-? 后面跳出了计算，这个特征马/最总的操作数串(完整的表达式串)应当放弃和(2+2)*3*2不会重复再比如6,6,6,6 可以生成的特征马 6-+-6-12-+-6-18-+-6 6-*-6-36---6-30---6 再比如12,12,12,12 可以生成的特征马 12-+-12-24-/-12-2-*-12 12-/-12-1-*-12-12-+-12 12-+-12-12-/-12-1-*-24

[此贴子已经被作者于2004-5-12 19:06:09编辑过]

游侠无极限 · 发表于 2004-5-11 12:15:00

不太明白，比如
1*2*3*4
2*4*3*1
2*1*3*4
2/(1/(3*4))

的特征码是多少呢

唐明 · 发表于 2004-5-12 19:03:00

2)检查前面 / 后面的运算，如果与现在将要进行的相同则继续检查前"面"生成的特征马的"后"面一个操作数/"后"面生成的特征马的"前"面一个操作数，"前"面生成的特征马的"后"面一个操作数>现在的"后"操作数 / "后"面生成的特征马的"前"面一个操作数>现在的"前"操作数，则跳出运算（5月13日注：这规则是在前后都有计算过的运算时） ↓修改 ↓ (5.13.2004修改) 3)"+"/"*"作运算时"前"面的运算级别与现在将要进行的"相"同则"前"面的运算的"后"操作数必须是>=现在将要进行运算的"后"操作数,如果不符合则跳出运算 4.2)"/"检查"后"面的运算级别<=4，则在相应操作数串上+（）如果认为/(a/b)=/b*a /(a*b)=/a/b 则"后"面的运算级别=4或=3跳出运算（我认为是相等的） 8.2)为了避免6*3*2和6*（3*2）6*3/2和6*（3/2）...重复，"*"后面有"*" / "/"跳出运算更见规则，你给出的狮子只有4*3*2*1是合法的，其他狮子舞发生成特征马 4*3*2*1 次序：1,2, 3 运算 *(3) ,*(3),*(3) 括号内是级别 4*3=12 -> 4-3-3 结果12 12*2=24 -> 12-*-2 结果24 24*1=24 -> 24*1 结果24 ↓ ↓ ↓ 都是级别最总特征马4-3-3-12-3-2-24-3-1 4*3 12*2 42*1 其他可以得到的特征吗（还有其他我原来里出的规则） 4-0-2-3-0-1-6-3-4 （4+2）*（3+1） 3-0-2-5-0-1-6-3-4 (3+2+1)*4

游侠无极限 · 发表于 2004-5-13 20:41:00

我想了一个特征码：
取每个操作数所进行的运算符
即：
1*2*3*4
各个操作数进行的运算分别为：
1 *
2 *
3 *
4 *
特征码为****
(1+3)*(2+4)为
1+
3+
2+
4+
为++++
2/(1/(3*4))
2/
1/
3*
4*
为**//
隐含特征码为四个操作数和运算结果，因为相同，所以除去
目的是消除因加法和乘法交换率引起的重复
不知道有没有漏掉的，或者误除的

[此贴子已经被作者于2004-5-13 20:43:35编辑过]

		自动登录	找回密码
密码			注册论坛(EC通行证)

有没有人想过怎么用计算机来实现24点

下沙大学生网推荐 /1