有没有人想过怎么用计算机来实现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; //载入进行穷举的操作数 9 G+ Z& |3 X5 ^" A! f6 v& K: V for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号4 a) {1 z: I+ r8 W; o “ * {* [ Q* T/ Q8 o. U0 N前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组6 t8 f( H! p* { 后来二句： 3 i3 | N" M1 S4 o for(i=0;i = FormulaNum; //载入进行穷举的操作数3 C) Q4 q) J( O q8 E# { for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 6 E6 o/ N2 X& V$ \; M 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了4 V3 e- j4 J ]2 N. o3 m) r% O

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

‘最后一次发代码

- w# ^' f) c; Q3 p% n$ x+ B4 O: G % R, _, b- G B% \) ~) n/ e1 |, _

; O e& y+ V3 Z5 ?, Z$ _3 \ ) B# ?! ]1 z+ h5 p; g ( Q- E! E4 t$ Q+ T 5 h) u @2 M% S% e 7 w4 _: T( ^2 R ^" W6 E$ T8 o

; E$ ?; h1 N! A0 @ 3 F4 W) ]1 V! m+ x6 A

[此贴子已经被作者于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的发言： 4 v8 F% m9 V" k1 A7 _- H% [0 i这个题目不容易呢，好多高手都出马了，不错不错，不佩服的不行。/ E& X- k& s2 H' L 来了点好奇心，对游侠无极限的程序运行了一下. t3 q3 K) \( y1 h9 Q3 @# P 算法还没有看懂，为什么结果会都是重复的？6 J) r* Y! m8 d “ : e! D" [* D0 Y, \6 J( s+ o- n) o9 o. x 请输入4个数（用回车或者空格分开）：5 5 8 8$ n' ?" }7 {: m2 S 5*5-8/8 & i7 Y% a) o- U, {6 { 5*5-8/86 v# L6 V( M7 F2 N2 v0 u c* j3 i 5*5-8/8$ {- I& i3 o1 [3 D 5*5-8/87 b6 z" j% E. g 总计4个式子3 G; Q. C! i8 F8 d" z “( `* o2 M) n+ t% ~+ `1 E" m7 G: u 另外程序有一点点小错误： 2 s; I3 F7 \% J ” ! G, e! E. Z& v% w8 z& E int EnumFormula(int *FormulaNum,int num,int sum) # s4 ~- J! I* Y2 [ {, @, [! e% n! S3 Q int result = 0; " _* H! G4 j1 @$ h0 t& ?& [ int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 5 H3 ^) R0 w' G% R! H) q, e, B int *Formula = (int*)calloc(num*2-1,sizeof(int)); //波兰表达式储存空间 9 @+ O Y5 v) t: b9 Q6 T0 i7 ] int *temp = (int*)calloc(num*2,sizeof(int)); //波兰表达式的代号表示空间 % L# F$ g6 ^- r; I- k5 ?, U int i,j; 2 O* v+ {% ^- I- O for(i=0;i = FormulaNum; //载入进行穷举的操作数 o3 S. L1 ~' g9 j( X, \ for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号' i5 R w* `1 g6 W; j “ & s* c4 l' }6 G; _+ e9 @. i1 z% ^ 前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 ' u) o) [3 |- J% n$ G% p+ Y 后来二句： 5 D: U& c' n5 s( V" w for(i=0;i = FormulaNum; //载入进行穷举的操作数* y- Q. i {, h for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 {) u- A2 l0 Z) O2 C9 | 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了0 {, N" G9 ?/ s3 G% t

4 Q0 s9 u, I! G& g ! J. J1 N& i2 y/ l" I V% w真是太感谢了，想必释放错误是由于这个越界啊 + h+ g! ]* Q8 a7 S* a至于重复，其实是这样的： ; h7 z4 d& Q9 C你输入的 5 5 8 8，在穷举中，第一个5和第二个5不等价，同样第三个8和第四个8不等价，所以结果是 7 v( n. A( M( Q7 T: A" D; G9 ?5(1)*5(2)-8(3)/8(4). i8 Y" x6 J% l% ^ 5(2)*5(1)-8(3)/8(4)) E7 P/ @0 F0 V- W3 u 5(1)*5(2)-8(4)/8(3) / Q% B+ q( e: O# }5(2)*5(1)-8(4)/8(3)' o6 d+ \; `) q7 i5 F7 H! X( e6 r

唐明 · 发表于 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