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

hzzh

这个题目不容易呢，好多高手都出马了，不错不错，不佩服的不行。 " q( P6 t, n& X& t7 a, g p来了点好奇心，对游侠无极限 的程序运行了一下 2 l' e/ B1 t' _9 k, d算法还没有看懂，为什么结果会都是重复的？ ! ~ y( L; P- Y1 U/ Y“ 1 N7 q# l* X9 m+ L$ R. Y6 i/ r请输入4个数（用回车或者空格分开）：5 5 8 8 : i+ [# D) {- P. @ }5*5-8/8 5*5-8/8 5*5-8/8 5*5-8/8 总计4个式子 ) j9 y8 h# I ^3 C. [" w. B“ 3 i% a1 P6 t) |另外程序有一点点小错误： ” . [8 ]" u: ^% Hint EnumFormula(int *FormulaNum,int num,int sum) { int result = 0; $ H ?& E, I* T int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 . z. H0 N# [5 u, [- Q- P$ Z int *Formula = (int*)calloc(num*2-1,sizeof(int)); //波兰表达式储存空间 int *temp = (int*)calloc(num*2,sizeof(int)); //波兰表达式的代号表示空间 int i,j; 7 [0 p6 j' p9 n. u9 Z/ J; k7 E for(i=0;i = FormulaNum; //载入进行穷举的操作数 for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 : ^6 y: W4 j: D& B6 c9 m" c! L, R “ ' }! q- r' e2 P3 _/ e7 q8 F前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 后来二句： & R2 P1 x/ K/ U+ V4 A5 T for(i=0;i = FormulaNum; //载入进行穷举的操作数 for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 ; ~1 w0 `: F( Q/ }- A% P 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了

唐明

‘最后一次发代码 * F% J" ^4 p1 l% S$ @2 A* G

* i* D3 N Y4 b, e

9 D0 q% S7 E) ^' a9 c4 k. I 6 d0 s( T0 ?6 ~: X% k. s 7 o3 U/ k& {$ {$ S. d+ w+ G' q 2 E. R. ?3 I0 f4 a2 k" D; p

3 U5 B* z+ S* D, c) U1 A

- c3 R# H8 P0 M0 `) f. f" p( x 7 E4 h# W8 {; i4 F4 D, e

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

0 K( z+ G/ M( a, Q9 |% Z

yzhlinux

佩服佩服，不佩服不行了，
代码越来越工整，注释越来越详细实用，
' w+ {$ n" l" y4 X9 \0 ~. [) r' K真是长江后浪推前浪啊，前浪死在沙滩上

游侠无极限

以下是引用hzzh在2004-5-8 17:31:09的发言： % b' W$ t+ \0 h$ n这个题目不容易呢，好多高手都出马了，不错不错，不佩服的不行。 4 X' @5 I$ y a& j$ } 来了点好奇心，对游侠无极限 的程序运行了一下 1 J( j% _2 u1 f. U6 n$ d8 Q! j 算法还没有看懂，为什么结果会都是重复的？ 4 \- i6 [( |. l; l. x0 N$ t' g! ^5 B( m “ 请输入4个数（用回车或者空格分开）：5 5 8 8 5*5-8/8 # n- W" a+ N/ B& }7 q 5*5-8/8 ( q8 }- Y! ~/ A9 {9 T 5*5-8/8 , K O- _. A& K. v# |5 p$ z4 J 5*5-8/8 总计4个式子 “ / O3 n, H$ i$ m2 g( V 另外程序有一点点小错误： # h1 |# s: n5 N6 x% a' b ” int EnumFormula(int *FormulaNum,int num,int sum) ; E0 D# [! u+ U6 X { % w* R1 I; R- b8 } int result = 0; 1 b. ~' V$ o* E2 a3 B% G7 n& p7 s 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)); //波兰表达式的代号表示空间 . [% f, |& J- X4 K/ Q int i,j; for(i=0;i = FormulaNum; //载入进行穷举的操作数 , w! k3 K G" c# Q- i7 I) N for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 “ " F7 W- j l8 r/ U- e0 ` 前面定义： int *NumSym = (int*)calloc(num+4,sizeof(int)); //操作数运算符组成的可枚举组 $ ^# q8 [% f& [' R! }% [ s# K 后来二句： ! _5 X8 I" g5 G( c for(i=0;i = FormulaNum; //载入进行穷举的操作数 for(j=0;j<5;j++) NumSym[i+j] = -j-1; //载入进行穷举的运算符号 1 D* \+ F+ ~ s; t5 Q" m 当num=4时，经过第一个for，i=4，第二个for中 NumSym[i+j]， i+j=8，NumSym越界了

真是太感谢了，想必释放错误是由于这个越界啊 至于重复，其实是这样的： 你输入的 5 5 8 8，在穷举中，第一个5和第二个5不等价，同样第三个8和第四个8不等价，所以结果是 # D3 q% [8 f1 U) e2 v5(1)*5(2)-8(3)/8(4) 5(2)*5(1)-8(3)/8(4) 5(1)*5(2)-8(4)/8(3) 5(2)*5(1)-8(4)/8(3) 1 T7 `4 O$ i& T F+ g/ e2 p$ h8 H

唐明

给游侠无极限 : N7 o" V9 Q& v9 m定义 9 w; V. W3 u: {; W/ Y1 ?. ~ 操作数: 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 等等 * J& Z6 [! z7 y* N8 b1 s 运算x,o1,o2,o3,ox 进行的计算 操作数串: s1,s2,s3,s4 1 `6 E' i { `7 z9 A 特征马: v1-o1-v2-v12-o2-v3-v123-o3-v4 这是按照p1,p2,p3的次序且v1>v2,v12>v3,v123>v4 3 u- u8 b k0 S6 X次序px=6 & a8 J( v! M6 H! S7 Y运算ox="=" 1)次序为 : "()" > "/" > "*" > "-" > "+" 相应级别: 5 4 3 1 0 # |( A+ w. d) T0 @/ ?, g! X2)检查前面 / 后面的运算，如果与现在将要进行的相同则继续检查前"面"生成的特征马的"后"面一个操作数/"后"面生成的特征马的"前"面一个操作数，"前"面生成的特征马的"后"面一个操作数>现在的"后"操作数 / "后"面生成的特征马的"前"面一个操作数>现在的"前"操作数，则跳出运算 （5月13日注：这规则是在前后都有计算过的运算时） 3)"+"/"*"作运算时"前"面的运算级别与现在将要进行的"相"同则"前"面的运算的"后"操作数必须是>=现在将要进行运算的"后"操作数,如果不符合则跳出运算 4.1)"/" / "*"检查前/后面的运算，小雨当前运算级别超过1，则在相应操作数串上+（） 7 M. e, F X$ S8 z( }4.2)"/"检查"后"面的运算级别<=4，则在相应操作数串上+（） 如果认为/(a/b)=/b*a /(a*b)=/a/b 则"后"面的运算级别=4或=3跳出运算 3 r. i! @+ D- z$ |- f4.3)"*"检查"后"面的运算级别<3或=4，则在相应操作数串上+（） 4.4)"-"检查"后"面的运算级别<=1，则在相应操作数串上+（） 如果认为-(a-b)=-b+a -(a+b)=-b-a 则"后"面的运算级别=1或=0跳出运算 5)第2,3次运算结束时这次运算的运算代替次序在他之前的运算的运算 6)王成一个表达时的计算时应当分别保存特征马和最总的操作数串(完整的表达式串)在一个容器之中，已经存在相同的特征马则应该放弃现在的特征马和最总的操作数串(完整的表达式串) + u5 p+ H2 |( X9 _7)如果认为*1和/1是相同的则两者只能选一，（禁止(当...时跳出运算)*/1或/1中的一个）或（*/1或/1中的一个生成特征妈时转换为对方） $ M5 I; J5 B% p0 b/ Z8.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）...重复，"*"后面有"*" / "/"跳出运算 0 }2 O+ i2 o2 T3 n3 K; P一个特征马的存储形式:char[n,7]={{v1,o1,v2,o2,v3,o3,v4},...} ) r U Y' e) h4 h5 v/ ^ D: \ 这里所有跳出运算都可以通过改变前后的特征马而不跳出运算，但是那样很麻烦 ; K8 G# h- u7 { M这个产生特真马的前提就是我的代码（规则是比较乱的）的前提，这里只是描述的相对清楚，特征马就是我的代码中允许的表达时的计算过程，所以我的这个铁自可能是多余的 # e6 i3 M% y) _9 i 4 \+ J3 { }9 J**************************************** 例子1: 次序左右的6 运算左右的= 6 a2 F* A+ G3 g% X, m4 \! f省略了 : |5 B. C: K8 }# s8 a0 b**************************************** 操作数: v1,v2,v3,v4 运算次序: p1,p2,p3 运算: o1,o2,o3 操作数串: v1,v2,v3,v4 6 U6 w& Y' J: d6 f # h! R: J0 U$ _( m下面是计算 原操作数: v1,v2,v3,v4 6 e- P; _1 c/ Y+ d" L" M一次运算: v12 ,v3,v4 运算次序: px,p2,p3 运算: ox,o2,o3 操作数串: v1p1v2,v3,v4,v4 二次运算: v123,v4 运算次序: px,px,p3 $ Z' D G$ [3 e; A I" C 运算: ox,ox,o3 操作数串: v1p1v2p2v3,v4,v4,v4 * v, s/ m1 R7 h% Z2 F* T2 [7 U 三次运算: v1234 运算次序: px,px,px ) R5 W+ ?; H J4 \- R* g 运算: ox,ox,ox ' y9 r. Y5 y! H. T操作数串: v1p1v2p2v3p3v4,v4,v4,v4 ! q! C( {' c" }2 z% ] Q9 ~, C 下面是特征马 j+ w) ?/ A7 t2 q) |, |" u6 fv1-o1-v2-v12-o2-v3-v123-o3-v4 & V! R# \" F0 ~( x6 E/ U4 b6 y9 w: r这是按照p1,p2,p3的次序且v1>v2,v12>v3,v123>v4 最总的操作数串(完整的表达式串) ; @6 P$ r; M. u0 v2 s3 Yv1p1v2p2v3p3v4 **************************************** 4 h% I" X: m- j **************************************** ' Q' u5 w( h' t6 n8 ^3 d例子1的实例: 6 r) C- B6 m! n- L9 o) n6 ^+ V次序左右的6 # h D1 a2 C" a- T3 ^运算左右的= 省略了 & q) f, e! n8 W8 C& h**************************************** 1 F7 Q1 T" _) y5 u, P+ [ 操作数: 2 ,2 ,3 ,2 运算次序: 1 ,2 ,3 8 a4 u: u4 U& |: n0 k 运算: + ,* ,* + p. ?1 M9 A/ L5 B操作数串: 2 ,2 ,2 ,2 % \5 |5 _/ v. e, K就是: (2+2)*3*2 9 ]5 F! _6 Q# i: k% Z' U9 r6 |下面是计算 原操作数: 2 ,2 ,3 ,2 . e. H' Z3 [. [3 Z* P& A& u# I0 J一次运算: 4 ,3 ,2 运算次序: 6 ,2 ,3 运算: + ,* ,* 生成2-+-2 # B8 H: `1 R9 e* R* p* h操作数串: 2+2,3,2,2 6 a8 b* O5 x8 r3 ]6 o 二次运算: 12,2 % [; ^1 k% Q8 g5 w$ a运算次序: 6 ,6 ,3 + n8 H$ ~" D) o- l/ k9 c# s: z& ] 运算: * ,* ,* 生成4-*-3 ! `2 a! ~1 Y3 `" R2 j* U' s$ e- u$ B操作数串: (2+2)*3,2,22 加上括号 ! _, [, A, `7 n3 x6 b$ p三次运算: 24 运算次序: 6 ,6 ,6 运算: * ,* ,* 生成12-*-2 - ]2 `* E; ]2 q. f: Y' G/ N操作数串: (2+2)*3*2,2,2,2 0 \9 \) ]; F0 H) x5 B; W6 [ 下面是特征马 ( H6 M9 h9 h1 V: H: l) `$ y6 ]2-+-2-4-*-3-12-*-2 , W( \! M' R* T9 V, Q按照1，2，3(就是次序)的顺序 2 M# ]1 {% l& Z# h最总的操作数串(完整的表达式串) ) j" N0 ^2 A% e2 y( R! Y9 f2 A9 ?4 s(2+2)*3*2 ; {. g' ^3 x. y**************************************** , D4 u6 C9 s" Z7 X 1 l* Y) g- c5 Q3 ]; z! G4 c再比如2*(2+2)*3 特征马 ( v) T5 e8 d1 G4 P2-+-2-?-?-?-?-?-? ; l0 j2 b; K7 K" z3 t: D后面跳出了计算，这个特征马/最总的操作数串(完整的表达式串)应当放弃 ' }% Q2 s m$ `& f和(2+2)*3*2不会重复 5 `9 ], b" t, c4 D { 再比如6,6,6,6 可以生成的特征马 6-+-6-12-+-6-18-+-6 . X6 T3 t. B6 s! O6-*-6-36---6-30---6 7 j, D# h0 Z" m) v- f& n& ` ' c$ c; w: s M: u$ r0 M! p+ K再比如12,12,12,12 & N: W, A8 [, \可以生成的特征马 12-+-12-24-/-12-2-*-12 12-/-12-1-*-12-12-+-12 , d* _1 b o, ^( Q6 O12-+-12-12-/-12-1-*-24 ! U& V9 P2 B/ w: N5 V; Z# V ; e4 w7 A0 o" U- h 4 K9 Z7 W# `" L7 t9 I # T: Z+ a' `! ~) F6 d ' I% t% C3 u+ f+ _* V : a! r/ V( _. g# @, E! ?4 A: _% g

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

游侠无极限

不太明白，比如
1*2*3*4
1 z8 G( r. z3 }# x7 u5 k& D0 N; u2*4*3*1
2*1*3*4
+ I3 o! w5 E5 V( W$ ]2/(1/(3*4))
6 z, S# f0 h7 c% _' }9 b  V
的特征码是多少呢

唐明

2)检查前面 / 后面的运算，如果与现在将要进行的相同则继续检查前"面"生成的特征马的"后"面一个操作数/"后"面生成的特征马的"前"面一个操作数，"前"面生成的特征马的"后"面一个操作数>现在的"后"操作数 / "后"面生成的特征马的"前"面一个操作数>现在的"前"操作数，则跳出运算 （5月13日注：这规则是在前后都有计算过的运算时） ↓修改 ↓ (5.13.2004修改) 3)"+"/"*"作运算时"前"面的运算级别与现在将要进行的"相"同则"前"面的运算的"后"操作数必须是>=现在将要进行运算的"后"操作数,如果不符合则跳出运算 4.2)"/"检查"后"面的运算级别<=4，则在相应操作数串上+（） 如果认为/(a/b)=/b*a /(a*b)=/a/b 则"后"面的运算级别=4或=3跳出运算 （我认为是相等的） 5 p) W0 k' G# G3 a 8.2)为了避免6*3*2和6*（3*2）6*3/2和6*（3/2）...重复，"*"后面有"*" / "/"跳出运算 * o& H+ x: o' ?. Y ! W( G; J. {% W. z6 M" Y更见规则，你给出的狮子只有4*3*2*1是合法的，其他狮子舞发生成特征马 & A5 ~4 y* ^0 V( m0 u/ [+ n 4*3*2*1 & ?' H/ s* \8 ?4 G次序：1,2, 3 $ Y, w! p/ a/ r' j; ?; Q+ p# i) d' c运算 *(3) ,*(3),*(3) 括号内是级别 ' _) c5 T+ `- i1 u g4*3=12 -> 4-3-3 结果12 12*2=24 -> 12-*-2 结果24 * \9 G' H2 `) V& i$ L# R7 e24*1=24 -> 24*1 结果24 " E$ M4 O, V- j) H ↓ ↓ ↓ 都是级别 7 m+ w& M N N( {最总特征马4-3-3-12-3-2-24-3-1 $ t, I: P9 y% L- @) W; G+ f 4*3 12*2 42*1 4 Q/ J0 w5 r% ]; p+ O其他可以得到的特征吗（还有其他我原来里出的规则） ' N7 f2 w4 h' b# V: ]4-0-2-3-0-1-6-3-4 （4+2）*（3+1） 5 p! \( F, y) x( h0 d: j# K3-0-2-5-0-1-6-3-4 (3+2+1)*4 0 \) @- J' X. e% v

游侠无极限

我想了一个特征码：
* j* D  c+ w8 J0 h4 P' |) w8 W取每个操作数所进行的运算符
' Y: y- P3 Q+ e3 v" i0 g" x9 C即：
1*2*3*4
各个操作数进行的运算分别为：
1 *
' Z  w* ?, y! n+ V2 *
3 *
8 I$ ?( y( V, E/ [4 *
- @8 \2 C* T) H. v& i$ P& o0 U特征码为****
4 Q4 ^/ P' N5 U- {/ r3 Z(1+3)*(2+4)为
1+
6 k1 v$ |! z/ @+ e; C3+
3 r2 s$ w% W/ \& y. k2+
4+
为++++
, u( \/ K1 x# [, V. D2/(1/(3*4))
2/
6 K9 N! q) d8 u' |1/
# L& o  K; D# D6 j" r3 j* F3*
4*
9 R5 k1 ]; p( m7 g为**//
隐含特征码为四个操作数和运算结果，因为相同，所以除去
目的是消除因加法和乘法交换率引起的重复
不知道有没有漏掉的，或者误除的

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