|
|
OPTION ARITHMETIC RATIONAL !多桁の整数
FOR A=2 TO 9
LET K=0 !a^k=b
LET B=1
LET N=1 !0がn個
LET S$=REPEAT$("7",N)
DO WHILE N<=7 !10個まで
IF POS(STR$(B),S$)>0 THEN !最初に見つかったもの
PRINT N; K
LET N=N+1 !次へ
LET S$=REPEAT$("7",N)
END IF
LET K=K+1
LET B=B*A
LOOP
PRINT
NEXT A
END
で計算させたら
7^175 が7が５個ならび、7^1857が7が６個並ぶ
という結果を出すのですが、
実際7^157を計算させると
7^175=
78011207912208158102404641279111807777771881820069326361118396985716038858440266
71779915606471699893312656644407347632248554716494939953912586437943
なる値で7が６個並んでしまいます。
これはどうしたことかわかりません。
|
|