過去ログ

ゴンとも
ア=a,イ=bとして
1/60=1/a+1/b
1=60/a+60/b=(60*b+60*a)/(a*b)
a*b=60*b+60*a
a*b-60*a-60*b=0
(a-60)*(b-60)=3600  より 十進Basic で

PRINT TIME$
FOR a=61 TO 3660
FOR b=a TO 3660
IF MOD(3600,b-60)<>0 AND MOD(3600,a-60)<>0 THEN GOTO 20
IF 1/60=1/a+1/b THEN LET s=s+1
10 NEXT b
20 NEXT a
PRINT s
PRINT TIME$
END

01:06:40
23・・・・・・(答え)
01:06:41
豊川市   1月2日(木) 1:11:21   MAIL:fttnm528@ybb.ne.jp   48658

過去問題一覧へ戻る