What is the smallest repunit (i.e. containing a digit 1
repeated and no other digits) which is divisible by a repdigit number 3333... 333 (digit 3 repeated 100 times)?
5 open "minrepun.txt" for output as #2
10 for I=1 to 100:N=N*10+1:next
15 Dvr=3*N
20 repeat
30 N=N*10+1
40 until N@Dvr=0
50 Ns$=cutspc(str(N))
60 print len(Ns$)
61 print #2,len(Ns$)
70 print #2,N:print #2,N/Dvr
80 close #2
finds a 300-digit repunit is the smallest
300
11111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
the quotient is
3333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333
6666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666666667.0
100 3's 99 6's anf a 7
|
|
Posted by Charlie
on 2017-11-06 12:38:05 |
computer solution
