作者Hotpenis5566 (恩)
看板Programming
标题[问题] 猜数字(电脑猜人)
时间Mon Dec 7 02:29:28 2009
猜数字因该算是老梗问题了=..=
我人猜电脑的可以写出来 (用C#视窗去写)
但是电脑猜人想了一整天脑快爆了= ="
我看有什麽穷举法(ptt猜数字的code)和消去法
我试着在ptt上面打..希望有人可以帮我解决问题..
我用C_Sharp写(有参考网路上)可是还是有问题QQ
/* textbox1是显示电脑产生的数字
textbox2是印出You win! You Cheat!
textbox3是输入几A,textbox4是输入几B
button1是输入好几A几B的按钮
*/
//目前是说索引在阵列的界限之外...而且textBox1.text一开始印不出东西= =
using System;
using System.Collections.Generic;
using System.ComponentModel;
............
namespace PcguessmyNum
{
public partial class Form1:Form
{
int[,] ADB=new int[5040,4]; //C10取1*C9取1*C8取1*C7取1,存放4个数字
bool isOver;//判断游戏是否结束
int a,b;//a=抓textbox1的几A,b=抓textbox2的几B
int randNum;//从ADB这个答案库里抓答案
public Form()
{
InitializeComponent();
}
private void Form_Load(object sender, EventArgs e)
{
while(1==1)
{
prepare();
while(!isOver)
{
ask();
answer();
if(isOver)
{
break;
}
think();
}
}
}
void prepare()
{
int i,tmp,unit1,unit10,unit100,unit1000;
remain=5040;
tmp=0;
isOver=false;
for(i=0;i<10000;i++)
{
unit=(i/1)%10;
unit10=(i/10)%10;
unit1000=(i/10)%10;
unit1000=(i/10)%10;
if(unit1!=unit10&&unit1!=unit100&&unit1!=unit1000
&&unit10!=unit100&unit10!=unit1000&&unit100!=unit1000)
{
ADB[tmp,0]=unit1000;
ADB[tmp,1]=unit100;
ADB[tmp,2]=unit10;
ADB[tmp,3]=unit1;
tmp++;
}
}
void ask()
{
int i;
Random a=new Random();
while(1==1)
{
randNum=0;
for(i=0;i<4;i++)
{
randNum *=10;
randNum +=a.Next()%10;
}
if(randNum<remain) break;
}
for(i=0;i<4;i++)
{
textBox1.Text=ADB[randNum,i].ToString();
}
}
void answer()
{
if(a+b>4)
{
textBox2.Text="Error";
}
if(a==4)
{
textBox2.Text="You win!";
isOver=true;
}
else if (remain==1)
{
textBox2.Text="You Cheat!";
isOver=true;
}
}
void think()
{
int i,j,k,aa,bb;
int[] refer=new int[4];
for(i=0;i<4;i++)
{
refer[i]=ADB[randNum,i];
}
for(i=0;i<remain;i++)
{
aa=bb=0;
for(j=0;j<4;j++)
{
for(k=0;k<4;k++)
{
if(ADB[i,j]==refer[k])
{
if(j==k) a++;
else bb++;
}
}
}
}
if(!((aa==a)&&(bb==b)))
{
for(j=i;j<remain;j++)
{
for(k=0;k<4;k++)
{
ADB[j,k]=ADB[j+1,k]
}
}
remain--;
i--;
}
}
if(remain==0)
{
textBox2.Text="You Cheat!";
isOver=true;
}
}
private void button_Click(object sender, EventArgs e)
{
string c,d;
c=textBox3.Text;
d=textBOx3.Text;
a=int.Parse(c);
b=int.Parse(d);
}
}
}
--
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.44.213.108
※ 编辑: Hotpenis5566 来自: 114.44.213.108 (12/07 02:37)
※ 编辑: Hotpenis5566 来自: 114.37.242.72 (12/07 02:51)
※ Hotpenis5566:转录至看板 C_Sharp 12/07 02:54