金光论坛 - JGLT.NET - JGWY.NET - JGWY.COM|国内外VPS资源推介|优质免费资源交流讨论

爱情孤儿 · 发表于 2004 年 10 月 19 日 19:38:28

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？注册

×

黄色房子主人养鱼

fish123 · 发表于 2004 年 10 月 19 日 19:41:26

我靠,头晕

拓风科技 · 发表于 2004 年 10 月 19 日 19:41:28

哈哈养螃蟹

阿健 · 发表于 2004 年 10 月 19 日 19:43:27

果然是人才出的人才问题

孤心人 · 发表于 2004 年 10 月 19 日 19:44:39

BT。。这些算是地理知识吧

eoyul · 发表于 2004 年 10 月 19 日 20:07:09

I　服了 YOU！

linxicn · 发表于 2004 年 10 月 19 日 20:07:28

我不养

天地无用 · 发表于 2004 年 10 月 19 日 20:07:48

偶属于98%的那些人

pigone · 发表于 2004 年 10 月 19 日 20:27:12

都答不出来就不用想了
反正每个面世的全是0，省电力气更好

闲庭信步 · 发表于 2004 年 10 月 19 日 20:32:21

此类东西俺一般只用电脑算

俺滴脑子只需要想如何让自己快快乐乐的过日子

----------------------------------------------------------------------------
using System;
namespace netsafe.math
{
public class ayst
{
/// <summary>
/// 问题中的所有元素
/// </summary>
string[,] data= {{"黄房子","蓝房子","白房子","红房子","绿房子"},
{"挪威人","英国人","德国人","丹麦人","瑞典人"},
{"DUNHILL",&quot

RINCE","混合烟", &quot

ALL MALL","BLUE MASTER"},
{"咖啡","矿泉水","茶","牛奶"," 啤酒 "},
{"鱼"," 恐龙","马", "鸟","狗"}};
/// <summary>/// answer用来存放答案
/// </summary>
int[,] answer=new int[6, 6];
int[,] ALL=new int[6,122];
int count=1;
int nLevel = 0;
int[] List=new int[6];
public static void Main(string[] args)
{
ayst c=new ayst();
c.p(); ///生成全排列到all
c.run();
Console.Read(); /// 按任意键继续
}
void run()
{
int i1,i2,i3,i4,i5;///通过逻辑条件顺序的有效选择来优化程序
for (i1=1;i1<=120;i1++)///房子
{
///9 、挪威人住第一间房子
///14 、挪威人住在蓝房子旁边
///不满足条件就短路
///
if (ALL[2,i1]!=2)continue;
for(int j=0;j<5;j++,answer[j,1]=ALL[j,i1]);
for (i2=1;i2<=120;i2++)///人种
{
for(int j=0;j<5;j++,answer[j,2]=ALL[j,i2]);
///9 、挪威人住第一间房子
if (ALL[1,i2]!=1)continue;
///1、英国人住在红房子里
///
if (find(1,4)!=find(2,2))continue;
///4 、绿房子在白房子左边
///
if (find(1,5)>find(1,3))continue;
for (i3=1;i3<=120;i3++)///烟
{
for(int j=0;j<5;j++,answer[j,3]=ALL[j,i3]);
///13、德国人抽PRINCE烟
///
if(find(2,3)!=find(3,2))continue;
///7 、黄房子主人抽DUNHILL烟
///
if(find(1,1)!=find(3,1))continue;
for (i4=1;i4<=120;i4++)///饮料
{
for(int j=0;j<5;j++,answer[j,4]=ALL[j,i4]);
///8 、住在中间那间房子的人喝牛奶
///
if(ALL[3,i4]!=4)continue;
///5 、绿房子主人喝咖啡
///
if (find(1,5)!=find(4,1))continue;
///3 、丹麦人喝茶
///
if(find(2,4)!=find(4,3))continue;
///15 、抽混合烟的人的邻居喝矿泉水
if(Math.Abs(find(3,3)-find(4,2))!=1)continue;
///12 、抽BLUE MASTER烟的人喝啤酒
///
if(find(3,5)!=find(4,5))continue;
for (i5=1;i5<=120;i5++)///宠物
{
for(int j=0;j<5;j++,answer[j,5]=ALL[j,i5]);
///10 、抽混合烟的人住在养鱼人的旁边
///
if(Math.Abs(find(3,3)-find(5,1))!=1)continue;
///2 、瑞典人养了一条狗
///
if(find(2,5)!=find(5,5))continue;
///6 、抽PALL MALL烟的人养了一只鸟
///
if(find(3,4)!=find(5,4))continue;
///11 、养马人住在DUNHILL烟的人旁边
///
if(Math.Abs(find(5,3)-find(3,1))!=1)continue;
///
///能活到这里的data,当然是答案喽
///
write_answer();
}
}
}
}
}
}
/// <summary>
/// 非常典型的用递归实现排列组合算法。
/// </summary>
public void p()  
{
int nCount,nJudge,key;
nLevel++;
if(nLevel>5)
{
writeall();///有一种排列就写到All数组里
nLevel--;
return;
}
for(nCount=1;nCount<=5;nCount++)
{
key=0;
for(nJudge=0;nJudge<=nLevel-1;nJudge++)
if(nCount==List[nJudge])
{
key=1;
break;
}
if(key==0)
{
List[nLevel]=nCount;
p();
}
}
nLevel--;
}
/// <summary>
/// 写入all数组
/// </summary>
void writeall()
{
int i;
for (i=1;i<=5;i++)
{
ALL[i,count]=List;
& [, {6 s& m  t/ d7 ?/ w} ' g% b1 ?. c+ ~! n& Q- ^
count++;
0 I6 ]7 o$ W0 V- V3 Y, G}8 b5 K& b" p8 z# M7 i9 l0 ]8 d
int find(int i,int j)
+ e6 F; [$ z  b; X3 g& D1 H: ~{
0 y" x5 Z4 j/ O% `int k;
* j' Y0 d1 c; h5 s9 N0 ufor(k=0;k<=5;k++)
% B+ E% }5 e5 P0 z7 q7 Z{! Y* q0 ?0 F# H& a5 _
if (answer[k,i]==j)" Q- V. z+ ?: q4 }
{
& L. Z0 a9 |1 s% f! Jreturn k;% l3 O4 B7 v3 ?( i
}
3 u! N+ g/ h1 V, m6 b) U}
3 P3 C7 \- p! T2 u' c' freturn -1;' j' _$ {0 D4 L
}
5 F) O( D1 t7 G. _8 d, j+ [. [. ]/// <summary>  j5 p- X% K9 k7 t6 F  B
/// 将答案打印出来5 b3 }' g5 \1 \' a! ?
/// </summary>- X7 y& S9 N, }; K$ K
void write_answer(). ~8 `5 P1 [+ W1 K, _8 K
{  O4 F' L  Z0 \# o
for (int i = 1;i<=5;i++)- b- e2 y/ L0 }2 K0 M/ Z3 }
{  t- W; {. c, F4 }8 p% J
for(int j=1 ;j<=5;j++)
! P& k7 C6 F% U  U{
. V7 J& k' D2 w/ m2 ]. F8 }Console.Write(data[i-1,answer[j,i]-1]+",");2 o; H0 V; q" Z# S6 S* v9 u* g+ u
}# ~) @3 p& g* Y0 C% i9 V6 \+ Q
Console.WriteLine();3 @# ?0 Z! [$ D9 G
}
3 [6 V7 e5 M, N8 O3 T* l+ A& sConsole.WriteLine();  ]: V  v/ Q! E; I" O# Y
}
# \) q* y0 N# ~/ J  H: L) c}
# e9 V0 v4 Q* A* z; U! }$ V4 ^}

账号		自动登录	找回密码
密码			注册