栖息谷-管理人的网上家园

楼主:德隆 - 

[脑力无限] 超级智力题

[复制链接] 35
回复
4805
查看
打印 上一主题 下一主题
楼主
发表于 2004-1-29 13:31:00 | 显示全部楼层

利用天平状态的变化确定标准球和坏球谁重谁轻

~o~

方法如下:

'将十二个球编号为1-12,用数组BALL[12]表示

'标记天平的左托盘为L,右托盘为R,标准球记为STD,坏球为BAD

'第一称,先将1-4号放在左边,5-8号放在右边。

L(BALL{1,2,3,4}) Vs R(BALL{5,6,7,8})

IF L=R THEN

 BAD IN BALL{9,10,11,12}

'第二称

L(BALL{1,2,3}) Vs R(BALL{9,10,11})

IF L=R THEN BALL{12} IS BAD,FINISH

IF L>R THEN 

   STD>BAD   '坏球较轻

   '第三称

   L(BALL{9}) Vs R(BALL{10})

   IF L>R THEN BALL{10} IS BAD,FINISH

   IF L<R THEN BALL{9} IS BAD,FINISH

   IF L=R THEN BALL{11} IS BAD,FINISH

ELSE

   STD<BAD  '坏球较重

   '第三称

   L(BALL{9}) Vs R(BALL{10})

   IF L>R THEN BALL{9} IS BAD,FINISH

   IF L<R THEN BALL{10} IS BAD,FINISH

   IF L=R THEN BALL{11} IS BAD,FINISH

END IF

ELSE

BAD IS IN BALL{1,2,3,4,5,6,7,8}

'分两种情况,一种情况是左托盘重

 IF L>R THEN

 '第二称,左托盘移走1-3球,从右托盘取5-7到左边,

 '并将9-11加到右托盘

 L(BALL{4,5,6,7})Vs R(BALL{8,9,10,11})

 IF L=R THEN

    BAD IS IN BALL{1,2,3}

    STD<BAD

    '第三称

    L(BALL{1}) Vs R(BALL{2})

   IF L>R THEN BALL{1} IS BAD,FINISH

    IF L<R THEN BALL{2} IS BAD,FINISH

   IF L=R THEN BALL{3} IS BAD,FINISH

ELSE

IF L>R THEN BAD IS IN BALL{4,8}

'第三称

L(BALL{1}) Vs R(BALL{4})

IF L<>R THEN BAD IS BALL{4}FINISH

IF L=R THEN BAD IS BALL{8} FINISH

    END IF

 ELSE

  '第二种情况,右边托盘重,同第一种情况的处理

  '具体方法省略

fficeffice" />

 END IF END IF

使用高级回帖 (可批量传图、插入视频等)快速回复

您需要登录后才可以回帖 登录 | 加入

本版积分规则   Ctrl + Enter 快速发布  

发帖时请遵守我国法律,网站会将有关你发帖内容、时间以及发帖IP地址等记录保留,只要接到合法请求,即会将信息提供给有关政府机构。
快速回复 返回顶部 返回列表