微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题老人分马
栏目软件操作与技巧
作者广东 贾玉宝
发布1994-01-28
  因为1/a+1/b+1/c=n/(n+1)<1所以a>=2,b>=3,c>=7,则n/(n+1)=1/a+1/b+1/c<=1/2+1/3+1/7=41/42,即n/(n+1)<=41/42,解得n<=41.如此有如下程序:
  5 REM '分马'
  10 PRINT "N", "X", "Y", "Z"
  20 FOR N = 6 TO 41
  30 FOR X = 3 TO (N + 1) / 2
  40 FOR Y = 2 TO X - 1
  50 Z = N - X - Y: IF Z >= Y THEN 100
  60 IF INT((N + 1) / X) <> (N + 1) / X THEN 100
  70 IF INT((N + 1) / Y) <> (N + 1) / Y THEN 100
  80 IF INT((N + 1) / Z) <> (N + 1) / Z THEN 100
  90 PRINT N, X, Y, Z
  100 NEXT Y, X, N
  110 END
  PRINT
  以上程序用Basic语言编写,在PC-286(无硬盘)机上,调试通过。