请教四输入5个数算24点的方法

zsyvb 2004-07-21 11:40:44

请教任意四输入5个数算24点的方法如果没有方法就提示!有方法列出所有的算法!

...全文

1123 15 打赏收藏转发到动态举报

写回复

用AI写文章

15 条回复

切换为时间正序

请发表友善的回复…

发表回复

zsyvb 2004-08-23

打赏
举报

vc++的那个调试好你有点问题哦！

Vb_Net4Zeng 2004-07-22

打赏
举报

要求推广，给Ｎ个数，算等于Ｍ.

Randy002 2004-07-21

打赏
举报

排列组合一个一个试
注意点封装技巧就是了

modou 2004-07-21

打赏
举报

我这有4个数算24点的代码,可惜太长了,3页呢~

Overriding 2004-07-21

打赏
举报

楼主说的不够清楚，你到底想实现什么样的功能啊？

webmasterss 2004-07-21

打赏
举报

我有四个数的，不过比较容易改成5个数的，需要的话给我发消息，留下你的邮箱

在途中 2004-07-21

打赏
举报

了不起

wtadminxjeri 2004-07-21

打赏
举报

wtadminxjeri 2004-07-21

打赏
举报

<html>

<title>neweroica的抢24游戏</title>

<h2>24点游戏初解</h2>
<h4>作者：neweroica(aqyw)</h4>
<input type=hidden name=a1>
<input type=hidden name=b1>
<input type=hidden name=c1>
<input type=hidden name=d1>
<table>
<tr>
<td>
<b id=a2 style="width:60;height:100;font-size:25pt;cursor:hand;background:#ff8888;border:solid 1px #000000;" onclick=addN(a1.value)> </b>
<b id=b2 style="width:60;height:100;font-size:25pt;cursor:hand;background:#ff8888;border:solid 1px #000000;" onclick=addN(b1.value)> </b>
<b id=c2 style="width:60;height:100;font-size:25pt;cursor:hand;background:#ff8888;border:solid 1px #000000;" onclick=addN(c1.value)> </b>
<b id=d2 style="width:60;height:100;font-size:25pt;cursor:hand;background:#ff8888;border:solid 1px #000000;" onclick=addN(d1.value)> </b>

<p>
<input type=button value=发牌 onclick=cards(0)>
<input type=button value=自定 onclick=cards(1)>
<font color=#00aa00>正确</font><b id=correct style="width:30;height:;border:solid 1px #aaaa88;">0</b>
<font color=#aa0000>错误</font><b id=wrong style="width:30;height:;border:solid 1px #aaaa88;">0</b>
<font color=#0000aa>正确率</font><b id=yeild style="width:60;height:;border:solid 1px #aaaa88;">0</b>
</p>
</td>
<td>
<table cellspacing=2 cellpadding=2>
<tr>
<td colspan=4>
<b id=formula style="color:#000088;width:200;height:25;border:solid 1px #880000;"> </b>
</td>
</tr>
<tr>
<td>
<input type=button value=+ style="width:30;height:30" onclick=add()>
</td>
<td>
<input type=button value=- style="width:30;height:30" onclick=minus()>
</td>
<td>
<input type=button value=* style="width:30;height:30" onclick=mult()>
</td>
<td>
<input type=button value=/ style="width:30;height:30" onclick=divd()>
</td>
</tr>
<tr>
<td>
<input type=button value=( style="width:30;height:30" onclick=lbr()>
</td>
<td>
<input type=button value=) style="width:30;height:30" onclick=rbr()>
</td>
<td>
<input type=button value== style="width:30;height:30" onclick=equ()>
</td>
<td>
<input type=button value=← style="width:30;height:30" onclick=bkspc()>
</td>
</tr>
<tr>
<td>
<input type=button value=重置 onclick=resetit()>
</td>
<td>
<input type=button value=无解 onclick=abort()>
</td>
<td colspan=2>
<input type=button value=查看答案 onclick=cal()>
</td>
</tr>
</table>
</td>
</tr>
</table>
<p id=showit style="color:#aa3388;width:300;height:150;border:solid 1px #008800;"> </p>
<script>
function numToChar(n){ //数字的单个字符表示；
return unescape('%u'+(n+1000));
}

function charToNum(c){ //单个字符表示对应的数字；
return parseInt(escape(c).substring(2,100))-1000;
}

var cardInf='',cardInf0;
var cardS=new Array(0,'A',2,3,4,5,6,7,8,9,10,'J','Q','K');
var typ=new Array(0,1,2,3);
var typhtml=new Array(
'<font color=#000000>'+unescape('%u2660'),
'<font color=#000000>'+unescape('%u2663'),
'<font color=#ff0000>'+unescape('%u2665'),
'<font color=#ff0000>'+unescape('%u2666'));
for(var i=1;i<=13;i++){
for(var j=0;j<4;j++){
cardInf+=numToChar(i)+typ[j];
}
}
cardInf0=cardInf;
var mode=new Array();
mode[0]='a+b+c+d';
mode[1]='a+b+c-d';
mode[2]='a+b-c-d';
mode[3]='a*b+c+d';
mode[4]='a*b*c+d';
mode[5]='a*b+c*d';
mode[6]='a*b*c*d';
mode[7]='a/b+c+d';
mode[8]='a/b/c+d';
mode[9]='a/b+c/d';
mode[10]='a*b*c/d';
mode[11]='a*b/c/d';
mode[12]='a*b/c+d';
mode[13]='a/b+c*d';
mode[14]='a*b-c-d';
mode[15]='a*b*c-d';
mode[16]='a*b-c*d';
mode[17]='a*b/c-d';
mode[18]='a*b+c-d';
mode[19]='(a+b+c)*d';
mode[20]='(a+b-c)*d';
mode[21]='(a*b+c)*d';
mode[22]='(a*b-c)*d';
mode[23]='(a/b+c)*d';
mode[24]='(a/b-c)*d';
mode[25]='(a+b+c)/d';
mode[26]='(a+b-c)/d';
mode[27]='(a*b+c)/d';
mode[28]='(a*b-c)/d';
mode[29]='(a/b+c)/d';
mode[30]='(a+b)*c+d';
mode[31]='(a-b)*c+d';
mode[32]='(a+b)/c+d';
mode[33]='(a-b)/c+d';
mode[34]='(a+b)*c-d';
mode[35]='(a-b)*c-d';
mode[36]='(a+b)/c-d';
mode[37]='(a+b)*c*d';
mode[38]='(a-b)*c*d';
mode[33]='(a+b)/c*d';
mode[40]='(a-b)/c*d';
mode[41]='(a+b)/c/d';
mode[42]='(a+b)*(c+d)';
mode[43]='(a+b)*(c-d)';
mode[44]='(a-b)*(c-d)';
mode[45]='(a+b)/(c+d)';
mode[46]='(a+b)/(c-d)';
mode[47]='a/b+c-d';
mode[48]='a+b/(c+d)';
mode[49]='a*b/(c+d)';
mode[50]='a+b/(c-d)';
mode[51]='a*b/(c-d)';
mode[52]='a/(b-c/d)';

var vari=new Array(
'0123',
'0132',
'0213',
'0231',
'0312',
'0321',
'1023',
'1032',
'1203',
'1230',
'1302',
'1320',
'2013',
'2031',
'2103',
'2130',
'2301',
'2310',
'3012',
'3021',
'3102',
'3120',
'3201',
'3210');

var z=new Array();
var zt=new Array();

function cards(ifmine){
formula.innerHTML='';
showit.innerHTML='';

if(ifmine){
z[0]=prompt('第一张牌的数字：','');
z[1]=prompt('第二张牌的数字：','');
z[2]=prompt('第三张牌的数字：','');
z[3]=prompt('第四张牌的数字：','');
for(var i=0;i<4;i++){
zt[i]='<font color=#000088>';
}
}
else{
for(var i=0;i<4;i++){
var index=2*Math.floor(cardInf.length/2*Math.random());
var cardN=cardInf.charAt(index);
z[i]=charToNum(cardN);
zt[i]=typhtml[parseInt(cardInf.charAt(index+1))];
cardInf=cardInf.substring(0,index)+cardInf.substring(index+2,cardInf.length);
}
if(cardInf==''){
alert('52张牌已全部发完！\n\n正确：'+correct.innerHTML+'；错误：'+wrong.innerHTML+'；正确率：'+yeild.innerHTML+'。\n\n\n再来一局！');
cardInf=cardInf0;
a2.innerHTML='';
b2.innerHTML='';
c2.innerHTML='';
d2.innerHTML='';
a2.style.backgroundColor='#ff8888';
b2.style.backgroundColor='#ff8888';
c2.style.backgroundColor='#ff8888';
d2.style.backgroundColor='#ff8888';
a1.value='';
b1.value='';
c1.value='';
d1.value='';
correct.innerHTML=0;
wrong.innerHTML=0;
yeild.innerHTML=0;
return 0;
}
}
a1.value=z[0];
b1.value=z[1];
c1.value=z[2];
d1.value=z[3];
var m1='<br><center>',m2='</center></font>';
a2.innerHTML=zt[0]+m1+cardS[z[0]]+m2;
b2.innerHTML=zt[1]+m1+cardS[z[1]]+m2;
c2.innerHTML=zt[2]+m1+cardS[z[2]]+m2;
d2.innerHTML=zt[3]+m1+cardS[z[3]]+m2;
a2.style.backgroundColor='#ffffee';
b2.style.backgroundColor='#ffffee';
c2.style.backgroundColor='#ffffee';
d2.style.backgroundColor='#ffffee';
}

AntingZ 2004-07-21

打赏
举报

microsoft:

8/(3-8/3)=24

aquahalo 2004-07-21

打赏
举报

5*(5-1/5)=24

quickmove 2004-07-21

打赏
举报

这种东西用javascript最好，因为可以把字符串变成源码编译执行。

hhhh63 2004-07-21

打赏
举报

我这儿有一段我用VC++写的。

void CC24Dlg::OnOk()
{
UpdateData();

m_list.DeleteAllItems();

m_num = 0;

ss(4, m_n, m_s);

if( !m_num )
AddList("无法计算!" );
}

void CC24Dlg::fs2(double n1, LPCSTR s1, double n2, LPCSTR s2, double *n, CString *s)
{
n[0] = n1 + n2;
s[0].Format("(%s＋%s)", s1, s2);
n[1] = n1 - n2;
s[1].Format("(%s－%s)", s1, s2);
n[2] = n2 - n1;
s[2].Format("(%s－%s)", s2, s1);
n[3] = n1 * n2;
s[3].Format("(%s×%s)", s1, s2);
n[4] = n1 / n2;
s[4].Format("(%s÷%s)", s1, s2);
n[5] = n2 / n1;
s[5].Format("(%s÷%s)", s2, s1);
}

void CC24Dlg::AddList(LPCSTR str)
{
LVFINDINFO lf;
lf.flags = LVFI_STRING;
lf.psz = str;
int n = m_list.FindItem(&lf);
if(n != -1)
return;

CString s;
m_list.InsertItem( m_num, 0 );
s.Format("%u", m_num+1);
m_list.SetItemText( m_num, 0, s );
m_list.SetItemText( m_num, 1, str );
m_num++;
}

void CC24Dlg::end2(double n1, LPCSTR s1, double n2, LPCSTR s2)
{
double n[6];
CString s[6];

fs2(n1, s1, n2, s2, n, s);
for( int k = 0; k < 6; k++ ){
if( (n[k] - 24 < 0.0000001) && (n[k] - 24 > -0.0000001) )
AddList(s[k]);
//if( n[k] == 24 ) AddList(s[k]);
}
}

void CC24Dlg::ss(int n, double *pn, CString *ps)
{
double n1[6], n2[3];
CString s1[6], s2[3];
int i1, i2, i3, i4;

for(i1 = 0; i1 < n-1; i1++){
for( i2 = i1+1; i2 < n; i2++ ){
if( n == 2 ){
end2(pn[i1], ps[i1], pn[i2], ps[i2]);
return;
}
fs2(pn[i1], ps[i1], pn[i2], ps[i2], n1, s1);
for( i4 = 1, i3 = 0; i3 < n; i3++){
if( i3 != i1 && i3 != i2 ){
n2[i4] = pn[i3];
s2[i4] = ps[i3];
i4++;
}
}
for( i3 = 0; i3 < 6; i3++ ){
n2[0] = n1[i3];
s2[0] = s1[i3];
ss( n-1, n2, s2 );
}
}
}
}

Tianli518 2004-07-21