計算24點

<html>
<head>
<title>24點</title>
<meta name="author" content="[email protected]">
<meta http-equiv="Content-Type" content="text/html; charset=GB2312">
</head>

<body>
<br>
計算24點(加、減、乘、除、括號) Javascript版 v1.1<br><br>
作者:<a href='mailto:[email protected]'>[email protected]</a> (轉貼請註明作者)<br><br>
2004-04-26 <br><br><br><br>
<form>
請輸入四個數字(1-13):<br><br>
<input type="text" name="fa" size="2">
<input type="text" name="fb" size="2">
<input type="text" name="fc" size="2">
<input type="text" name="fd" size="2">
<br><br><input type="button" name="btn" onclick="javascript:funCount()" value="  計算  ">
</form>


<br><br>
<br><br>
一副牌(52張)中,任意抽取4張可有1820種不同組合,其中有458個牌組算不出24點。
<br><br>
二十世紀80年代中期,孫士傑從上海到美國定居。孫士傑有幾位鄰居是美國人。鄰居家<br>
的小孩到他家串門,他沒有別的玩具供孩子們玩,就靈機一動,拿出一副撲克來教他們<br>
玩“24點”。誰知,這一玩,竟令美國孩子着了迷。這些孩子又把這種遊戲帶回家中和<br>
學校,人們發現這種遊戲對開發智力十分有益,後來就在全美推廣開了。

 


<script language="JavaScript">
function log(str)
{
 document.write("<br>"+str);
}

//生成計算表達式
function genExpress(exp,a,b,c,d,m1,m2,m3)
{
 var exp=exp.replace("a",a);
 exp=exp.replace("b",b);
 exp=exp.replace("c",c);
 exp=exp.replace("d",d);
 exp=exp.replace("m1",m1);
 exp=exp.replace("m2",m2);
 exp=exp.replace("m3",m3);
 return exp;
}


var answer = new Array();//正確答案的表達式
var counter = 0;//答案的個數

//測試表達式是否正確
function test(expn,a,b,c,d,m1,m2,m3)
{
 var exp;
 var ret;
 exp = genExpress(expn,a,b,c,d,m1,m2,m3);//生成計算表達式
 eval("ret = "+exp);
 if ( Math.abs(ret - 24) < 0.1 )
 {
  exp = exp.replace(";","");
  exp = replaceAll(exp,"*","×");
  exp = replaceAll(exp, "/","÷");
  var have = false;
  for ( var i=0; i<counter; i++)
  {
   if ( exp == answer[i] )
   {
    have = true;
    break;
   }
  }
  if ( !have )
  {
   answer[counter] = exp;
   counter++;
   log("<font color=red><b>"+counter+":&nbsp;&nbsp;"+exp+"</b></font>");
  }
 }
}

function replaceAll (streng, soeg, erstat)
{
 var st = streng;
 if (soeg.length == 0)
  return st;
 var idx = st.indexOf(soeg);
 while (idx >= 0)       
 { 
  st = st.substring(0,idx) + erstat + st.substr(idx+soeg.length);
  idx = st.indexOf(soeg);
 }
 return st;
}

var n = new Array();//四個數字

//接收四個輸入框的數字,調用主程序
function funCount()
{
 n[0] = document.forms[0].fa.value;
 n[1] = document.forms[0].fb.value;
 n[2] = document.forms[0].fc.value;
 n[3] = document.forms[0].fd.value;
 if ( n[0] > 0 && n[1] > 0 && n[2] > 0 && n[3] > 0 && n[0] < 14 && n[1] < 14 && n[2] < 14 && n[3] < 14 )
 {
  log("<font size=5><b>"+n[0]+", "+n[1]+", "+n[2]+", "+n[3]+"的24點答案:</b></font><br>");
  log("<input type='button' onclick='history.back(-1);' value=' 再來一次 '><br>");
  funMain();
  if ( counter == 0 )
  {
   log("沒有答案!");
  }
 }
 else
 {
  alert("輸入錯誤!");
 }
}

//主程序
function funMain()
{
    var m = new Array();
 //四種運算符
    m[0] = "+";
    m[1] = "-";
    m[2] = "*";
    m[3] = "/";
   
 //11種表達式
    var exp1 = "a m1 b m2 c m3 d;";
    var exp2 = "(a m1 b) m2 c m3 d;";
    var exp3 = "(a m1 b m2 c) m3 d;";
    var exp4 = "((a m1 b) m2 c) m3 d;";
    var exp5 = "(a m1 (b m2 c)) m3 d;";
    var exp6 = "a m1 (b m2 c) m3 d;";
    var exp7 = "a m1 (b m2 c m3 d);";
    var exp8 = "a m1 ((b m2 c) m3 d);";
    var exp9 = "a m1 (b m2 (c m3 d));";
    var exp10 = "a m1 b m2(c m3 d);";
    var exp11 = "(a m1 b) m2 (c m3 d);";
   
    var a,b,c,d;//四個數字
    var m1,m2,m3;//三個運算符
   
    for (var i=0;i<4;i++)
    {
     a = n[i];
     for (var j=0;j<4;j++)
     {
   if ( i == j ) continue;//從未選的三個數字中選擇一個數字
      b = n[j];
      for (var x=0;x<4;x++)
      {
    if ( x == j || x == i ) continue;//從未選的兩個數字中選擇一個數字
       c = n[x];
       for (var y=0;y<4;y++)
       {
     if ( y == x || y == j || y == i ) continue;//從未選的一個數字中選擇一個數字
        d = n[y];
   
        for (var ta=0;ta<4;ta++)
        {
         m1 = m[ta];      
         for (var tb=0;tb<4;tb++)
         {
          m2 = m[tb];      
          for (var tc=0;tc<4;tc++)
          {
           m3 = m[tc];    
           for (var k=1;k<12;k++)
           {
            eval("test(exp"+k+",a,b,c,d,m1,m2,m3);");
           }
          }
         }
        }
       }
      }
     }
    }
}
</script>
</body>

</html>

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章