[讨论]关于算法

kydtc

FOR X=1 TO 9999999 STEP 1
A=(X-1)/5 : B=(X-5)/6:C=(X-4)/7=(X-10)/11
IF A=INT(A):B=INT(B):C=INT(C)=INT(D)
THEN PRINT I :ELSE NEXT X
END

江中的小鱼

以下是引用kydtc在2005-7-9 14:22:54的发言：

FOR X=1 TO 9999999 STEP 1

A=(X-1)/5 : B=(X-5)/6:C=(X-4)/7=(X-10)/11

IF A=INT(A):B=INT(B):C=INT(C)=INT(D)

THEN PRINT I :ELSE NEXT X

END

你没开玩笑吧?你把这段东西放到星星里运行好了~出的来才怪

谷虫

FOR X=1 TO 9999999999999.......99 STEP 5
B=(X-5)/6:C=(X-4)/7=(X-10)/11
IF B=INT(B):C=INT(C)=INT(D)
THEN PRINT I :ELSE NEXT X
END

TopBoy

10 X=1
20 B=(X-5)/6:C=(X-4)/7=(X-10)/11
30 IF B=INT(B):C=INT(C)=INT(D) THEN PRINT I :END
40 X=X+5:GOTO 20

谷虫

楼上的和我的一样。。。[em01]

TopBoy

不过好像都不对

谷虫

转移到BAS版吧。

gongyilun

为什么把step选为5 呢，应该选为11快一点！

不过把setp选为66也可能更快

t:=-1;

while true do

  begin

    inc(t,66);

    if (t mod 5 = 1) and (t mod 7 = 4) then break;

  end;

writeln(t);

qyfcool

很简单的一个问题,是N年前<中学生电脑>上的,但写出最优算法并不容易.

题目:韩信点兵,有兵一队,五伍剩一,六伍剩五,七伍剩四,十一伍剩十,问兵几何?

答案以后帖！