有没有人想过怎么用计算机来实现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; //载入进行穷举的操作数 ; j. X' V) e3 C. Z6 T% g( I8 _ for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 $ V, X1 J3 ]0 b0 F# _ “ : w2 V1 K8 E. p前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 " ^! v/ M: w6 a; k: s& `/ \: q: u后来二句：7 n' `5 p8 ^7 O4 I0 X for(i=0;i = FormulaNum; //载入进行穷举的操作数: B" n6 y3 _+ |/ h2 n for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 F x8 Y# I4 x. F 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了 1 L0 q( _8 y1 t1 c- k7 F- H7 s

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

‘最后一次发代码

4 p% ]2 D# i- H4 a1 P1 Y! J ! `# d" I3 d7 A; g

; R1 Q& f5 M" B% i7 S+ ^ 1 k- @2 s' X+ a( ?/ { * E2 Z$ b0 d5 `: T / |- f8 o; [) i% H" w! ~ " C" p/ G; f' ]

7 W( b! v* r- j! [$ \" x 0 `3 j# j2 q" M3 _# U9 [) P3 e

[此贴子已经被作者于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的发言：8 v' T+ S6 L8 _) R$ [ 这个题目不容易呢，好多高手都出马了，不错不错，不佩服的不行。( k; t% C1 R( u+ W6 \6 K 来了点好奇心，对游侠无极限的程序运行了一下 / b: f; |* l& Y! o. B, W& j 算法还没有看懂，为什么结果会都是重复的？ & i/ v( d+ @3 k. V2 M2 u4 K+ j* W- \ “ 5 x9 t3 x* N# s6 V" m8 a 请输入4个数（用回车或者空格分开）：5 5 8 89 q! Q/ w/ A v7 d8 E( I 5*5-8/8 9 ]( P4 ]- X7 Z! D' A; W 5*5-8/8! A B" n- j( }4 F/ W% i3 t 5*5-8/8- C& c! N6 }3 q 5*5-8/8- B/ I/ e2 L1 y9 Y8 t/ }9 g+ Y 总计4个式子 ( `' L# P3 I2 N0 s% B/ e. v' a “ , z- h$ F$ t' w, Q 另外程序有一点点小错误： 3 n A7 C0 N' A! i o- z% D ”+ o, I" H; S& \. Q" d" Q1 [9 Q int EnumFormula(int *FormulaNum,int num,int sum)- B* i1 F& i/ I6 c }. j4 D0 ] { 3 B2 D- r1 r4 t( t int result = 0;( Z: c8 n# y5 G7 v3 p int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 2 d5 u" W1 r# D# M% r int *Formula = (int*)calloc(num*2-1,sizeof(int)); //波兰表达式储存空间* y+ G- Z( V0 D" ^ int *temp = (int*)calloc(num*2,sizeof(int)); //波兰表达式的代号表示空间: e1 |+ m2 \, {1 j' I" t# I! ]' \ int i,j; 7 c' F% G8 o; u5 Q for(i=0;i = FormulaNum; //载入进行穷举的操作数 S) m; y4 \9 H; Y1 p9 U# V) R for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号+ `) @0 D, ~$ o “$ E+ U( S8 H1 ~5 c' d9 R 前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组3 u$ o; d6 a5 e, Z! @ 后来二句：3 C; i; w9 {: T% v for(i=0;i = FormulaNum; //载入进行穷举的操作数) h3 }& K4 i; }0 C, e/ @ for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号0 \" C U- P% a- z9 X* q' q/ P 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了6 S2 V4 j2 Q! k- t

5 ^, t# b& m2 F6 \0 ~) L1 o$ e5 Z8 K% ]9 ]. D T* h 真是太感谢了，想必释放错误是由于这个越界啊* d- S, K* _ ]( L: s: C 至于重复，其实是这样的： ! }# @( a5 R7 u2 n/ r: U你输入的 5 5 8 8，在穷举中，第一个5和第二个5不等价，同样第三个8和第四个8不等价，所以结果是 # Z! w2 f& s: y/ G" W* q. W& k 5(1)*5(2)-8(3)/8(4)( \! W8 K0 b3 g- p 5(2)*5(1)-8(3)/8(4); f: A3 j- t' E' E+ @ 5(1)*5(2)-8(4)/8(3)0 `/ K8 {! C2 s' u& m# ?2 q 5(2)*5(1)-8(4)/8(3) * E% |$ P/ D" o! {

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