過去ログ
kawa
十進ベーシックで
FOR x=0 TO 20
FOR y=0 TO 20
LET a=2^10*3^10
LET b=a^2
LET c=2^x*3^y
LET p=MOD(b,c)
LET q=MOD(a,c)
IF p=0 AND q<>0 AND c<a THEN PRINT c
NEXT y
NEXT x
END
4月23日（木） 8:15:30
34368
過去問題一覧へ戻る