上一篇 | 下一篇

哪个灯泡还亮?

发布: 2007-1-25 13:07 | 作者: aougu | 来源: aougu.net | 查看: 482次

题目:
(` G*`2{ IdZid 奥古多媒体0~3c"De;| J
有100个带编号的灯泡(1~100),每个灯泡都有一个切换开关,一开始全部灯泡都是亮的.第一次把编号为1的倍数的灯泡切换一下(亮变暗,暗变亮),第二次把编号为2的倍数的灯泡切换一下,第三次把编号为3的倍数的灯泡切换一下,如此直到第一百次,把编号为100的倍数的灯泡切换一下.
7K5@Nq4} z;V_%v o 问最后还有哪几个灯泡是亮的??
-[;H2RQ:Bx.ckz bf 奥古多媒体+\aeO)Ai
代码,用的循环的思路,供参考:(爱伊)奥古多媒体5wQD5`f,t\
(加在电影脚本中,运行即可,我这里是显示出熄灭的灯泡的编号)奥古多媒体gz%J/|a y%s
奥古多媒体 kLNyd0v
global Plist
s.A5B4Fe S5vJ!_ on startmovie奥古多媒体Y{Z_SA QA6G\
  Plist=[]
z/Nyb-O9U   repeat with i=1 to 100 奥古多媒体|,r0G8] ^ eo
    add Plist,1奥古多媒体\lD(JG~
  end repeat 奥古多媒体V@;O4e]n9^0W O+K3I7Z
  -- put Plist
;v+lO6e}(yb L    repeat with i=1 to 100奥古多媒体6k/SY0d$~;uqQ.d
    repeat with j=i to 100奥古多媒体5X]_bd)o
      if j mod i=0 then Plist[j]=1-Plist[j]奥古多媒体w8pl5{j iM(oj
    end repeat 奥古多媒体E"@*?,T'iq;v cd
  end repeat
%\.zIqlR A*x   
oQ;CXyy   repeat with i=1 to 100
"?lc;[0I3b7Q#@4]     if Plist[i]=0 then put i奥古多媒体-LB-W6s1v}\n7j
  end repeat 奥古多媒体d%zj+^/G-h#o[(B
  -- put Plist 奥古多媒体#n.WBS G
end 奥古多媒体4rW oy$j7ve5H"f[ _
奥古多媒体Ia)fDs`5g
更多讨论参考:http://www.aougu.net/bbs/read.php?topicid=13276

字号: | 推荐给好友

 

评分:0

我来说两句

seccode


最新歌曲
转机 放生 黄玫瑰 摇啊摇 那滋味 擦肩而过 你若成风 幸福一辈子 依然在一起 吻得太逼真 感动天感动地 坐上火车去拉萨 怎么会狠心伤害我
心碎 冲动 小太阳 别碰我 蒲公英 爱情小偷 只要不亏 一定要爱你 等爱的玫瑰 无情的温柔 北极星的眼泪 最后一次的温柔 亲爱的那不是爱情
光荣 火花 下雨天 我可以 樱花草 为你写诗 独家记忆 再见小时候 寂寞才说爱 忘不掉的伤 爱上你是个错 第三者的第三者 孤独的时候可以抱你
假如 城府 是非题 有缘人 舍不得 我的答铃 只欠秋天 外滩十八号 越爱越难过 123木头人 爱走了心碎了 爱上你是我的错 爱情里没有谁对谁错