有没有人想过怎么用计算机来实现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 {: }4 x9 U, D% o2 f9 O for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号* Q/ P( {9 D: Q8 q2 G) R+ W “ I) t" w/ U% m. _- l/ q* p 前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 0 i1 [% |; W' y. I8 x后来二句：0 O; A3 c: |0 `' W. | for(i=0;i = FormulaNum; //载入进行穷举的操作数 7 c# D) k; x; }; f P! V for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号( {/ J* D8 i, ^2 | 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了( \/ y. S- Z& H) h) d; K, d2 A

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

‘最后一次发代码

( E( f% n5 \5 p2 s$ f- y5 q ) B: `( Y" ?" l8 m" X- @

" k1 ?5 ^4 h4 j+ c, `$ Z/ V, G% S * i6 r" P' W; v& N& ?8 w ' {" j" U4 Y* D" \. g & J" Q1 C8 P' N5 `0 G ( s/ ~3 Z1 V% _1 R2 U/ e

/ o3 g& ~ z5 _0 e% o! B: z 8 Y2 i1 P) ?- G. D

[此贴子已经被作者于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的发言： 1 U. K. V2 i% S$ l1 ^3 P这个题目不容易呢，好多高手都出马了，不错不错，不佩服的不行。 & I5 a$ Z+ X/ T; S* l8 X9 S 来了点好奇心，对游侠无极限的程序运行了一下 % c: p0 D* O' l7 y$ u. e 算法还没有看懂，为什么结果会都是重复的？4 ~- D0 v7 A) s- b2 K “ " c* X0 P* ~; a1 O0 I! G* D4 y0 y 请输入4个数（用回车或者空格分开）：5 5 8 81 Q2 ^2 s9 Y' o6 X0 S9 f7 ~4 t 5*5-8/8- f) c) R6 G7 ?6 Z 5*5-8/8 ( g- |% t( i5 P. u( @$ o3 H( W 5*5-8/8 4 |+ O2 x; ?( r- Y* _ 5*5-8/8 : v3 O+ S0 e) {& x 总计4个式子3 Z( ~" \5 c2 S+ T3 e0 N+ p7 i “8 H5 N1 o* J' d' ]/ X% X 另外程序有一点点小错误：8 S9 s( E7 Q' m1 Q4 p% a" W ”: e* p0 z3 x: X( ^4 O3 l/ L2 C1 f int EnumFormula(int *FormulaNum,int num,int sum)6 M- o/ L) J# b& }/ G! e& D { % z# N, R8 C x* r8 Z$ e int result = 0; 2 c; u- E; f# f' A int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组' F- u+ p) }2 K- X. S int *Formula = (int*)calloc(num*2-1,sizeof(int)); //波兰表达式储存空间" H* _0 r( |. m1 z$ b% d- ` int *temp = (int*)calloc(num*2,sizeof(int)); //波兰表达式的代号表示空间0 X& `- p8 f4 q4 z3 ?0 j4 ] B int i,j;% K( I+ {! L+ }3 ^- [ for(i=0;i = FormulaNum; //载入进行穷举的操作数 8 f6 Z3 W/ u, G1 V7 ]+ L9 _ for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号6 k) l% }+ r) B- g& | “ * i) S# N$ d" y8 E$ w 前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 . p* _- o. k& `' G 后来二句： / c( c5 x( z0 J for(i=0;i = FormulaNum; //载入进行穷举的操作数9 ]' P( g$ Y, u1 c for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号4 K2 n" i: R2 y2 z; p" r, z0 P N 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了- Q9 c/ Z! k% w) U, K$ k

2 m- k" G1 Q1 X% y6 L# A+ r% y$ P ( ^7 C( B0 I! \4 F真是太感谢了，想必释放错误是由于这个越界啊" w/ t+ d- v4 |3 f- Z7 g 至于重复，其实是这样的：- n! U! z7 ]4 N8 h$ t2 n5 S. X2 {4 ^ 你输入的 5 5 8 8，在穷举中，第一个5和第二个5不等价，同样第三个8和第四个8不等价，所以结果是 9 c+ I! C$ o( O- H, p; i) w 5(1)*5(2)-8(3)/8(4) . _, f$ ^& i1 j' M/ r& H U# a$ `5(2)*5(1)-8(3)/8(4) " r7 y5 j$ p x& m1 W5(1)*5(2)-8(4)/8(3) ( w; V+ i, `" `1 B/ {4 h; g5(2)*5(1)-8(4)/8(3): u3 X# W% A+ |, {3 H; n @. 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