计算24点的脚本

dearvoid

不错, 如果 awk 有 eval 函数就能写一个纯 awk 的了

r2007

时间紧没测试，像 1 5 5 5这四个数，结果是多少？
似乎没有考虑两个括号和括号嵌套的排列组合吧？

hniu

脚本的结果是

1. 
   
2. (5 - 1 / 5) * 5 =24
   
3. 5 * (5 - 1 / 5) =24
   

复制代码

当然这是一样的。

hniu

原帖由 r2007 于 2008-8-13 17:09 发表
时间紧没测试，像 1 5 5 5这四个数，结果是多少？
似乎没有考虑两个括号和括号嵌套的排列组合吧？

你说得对，我又修改了脚本，增加了5种新的组合。这回应该全面了。

比如算 1 1 5 7，
不用双括号是不行的。

dearvoid

冒昧美化了一下, 方便大家阅读:

-(dearvoid@LinuxEden:Forum)-(~/void/24dot/shell)-
[$$=4016 $?=0] ; cat 24dot.sh
#!/bin/bash
#
# Author: hniu (http://bbs.chinaunix.net/profile-uid-730781.html)
# From  : http://bbs.chinaunix.net/thread-1241657-1-1.html
#

if [ $# -ne 4 ]; then
    echo "Usage: $(basename $0) d1 d2 d3 d4"
    exit 1
fi

awk -v a=$1 -v b=$2 -v c=$3 -v d=$4 '
BEGIN {
  n[0] = a;
  n[1] = b;
  n[2] = c;
  n[3] = d;

  op[0] = "+";
  op[1] = "-";
  op[2] = "*";
  op[3] = "/";

  expr[0] = "(%d %s  %d) %s  %d  %s %d ";
  expr[1] = "(%d %s  %d  %s  %d) %s %d ";
  expr[2] = " %d %s (%d  %s  %d) %s %d ";
  expr[3] = " %d %s (%d  %s  %d  %s %d)";
  expr[4] = " %d %s  %d  %s (%d  %s %d)";
  expr[5] = "(%d %s  %d) %s (%d  %s %d)";

  for (ii = 0; ii < 4; ii++)
    for(jj = 0; jj < 4; jj++)
      for(kk = 0; kk < 4; kk++)
        if (ii == jj || jj == kk || ii == kk) {
          continue;
        } else {
          n[ii] = a;
          n[jj] = b;
          n[kk] = c;
          n[6 - ii - jj - kk] = d;
          for (one = 0; one < 4; one++)
            for (two = 0; two < 4; two++)
              for (three = 0; three < 4; three++)
                for (iExpr = 0; iExpr < 6; ++iExpr)
                  printf expr[iExpr] "\n", n[0], op[one], n[1], op[two], n[2], op[three], n[3];
        }
}' | sed 'h; s/^/"/; s/$/ = "/; G;' \
   | bc -l 2> /dev/null \
   | sed -n '/ 23.9999/{s/ 23.9999.*$/ 24/; p;}; / 24.0000/{s/ 24.0000.*/ 24/; p;}; / 24$/p;' \
   | sort -u
-(dearvoid@LinuxEden:Forum)-(~/void/24dot/shell)-
[$$=4016 $?=0] ; ./24dot.sh 3 3 7 7
(3 +  3  /  7) * 7  = 24
(3 /  7  +  3) * 7  = 24
7 * (3  +  3  / 7) = 24
7 * (3  /  7  + 3) = 24
-(dearvoid@LinuxEden:Forum)-(~/void/24dot/shell)-
[$$=4016 $?=0] ; bye

baoyu05

每种算法都很多，但很多是重复的
((5 + 7) - 9) * 8 = 24
(5 + (7 - 9)) * 8 = 24
能不能简化一下

dearvoid

要去除重复结果应该不会很容易 1) 判断哪些括号是不必要的; 2) (a + b) 跟 (b + a) 这种满足「交换律」的也要排除

yezhulin1982

收藏先！