View Single Post
Old 2013-02-13, 08:52   #5
LaurV
Romulan Interpreter
 
LaurV's Avatar
 
Jun 2011
Thailand

230316 Posts
Default

ok, got a bit of free time during lunch break:

[edit: scroll down, till the red texts]
[edit 2: all the "log" stuff is no needed, it is just to display the number of digits, I was lazy to use counters]

Code:
gp > n=5; log10=log(10); s=1; while(n<10^100, if(n^2%10^(cntdig=log(n)\log10+1)==n, print(cntdig": "n); s=10^cntdig); n+=s)
1: 5
2: 25
3: 625
5: 90625
6: 890625
7: 2890625
8: 12890625
9: 212890625
10: 8212890625
11: 18212890625
12: 918212890625
13: 9918212890625
14: 59918212890625
15: 259918212890625
16: 6259918212890625
17: 56259918212890625
18: 256259918212890625
19: 2256259918212890625
20: 92256259918212890625
21: 392256259918212890625
22: 7392256259918212890625
23: 77392256259918212890625
24: 977392256259918212890625
25: 9977392256259918212890625
26: 19977392256259918212890625
27: 619977392256259918212890625
28: 6619977392256259918212890625
30: 106619977392256259918212890625
31: 4106619977392256259918212890625
34: 9004106619977392256259918212890625
36: 109004106619977392256259918212890625
37: 6109004106619977392256259918212890625
38: 96109004106619977392256259918212890625
39: 896109004106619977392256259918212890625
41: 30896109004106619977392256259918212890625
42: 230896109004106619977392256259918212890625
43: 3230896109004106619977392256259918212890625
44: 23230896109004106619977392256259918212890625
45: 423230896109004106619977392256259918212890625
46: 3423230896109004106619977392256259918212890625
47: 23423230896109004106619977392256259918212890625
48: 423423230896109004106619977392256259918212890625
49: 7423423230896109004106619977392256259918212890625
50: 57423423230896109004106619977392256259918212890625
51: 557423423230896109004106619977392256259918212890625
55: 1000557423423230896109004106619977392256259918212890625
56: 11000557423423230896109004106619977392256259918212890625
57: 811000557423423230896109004106619977392256259918212890625
58: 3811000557423423230896109004106619977392256259918212890625
59: 63811000557423423230896109004106619977392256259918212890625
60: 863811000557423423230896109004106619977392256259918212890625
62: 80863811000557423423230896109004106619977392256259918212890625
63: 580863811000557423423230896109004106619977392256259918212890625
64: 9580863811000557423423230896109004106619977392256259918212890625
66: 509580863811000557423423230896109004106619977392256259918212890625
67: 6509580863811000557423423230896109004106619977392256259918212890625
68: 66509580863811000557423423230896109004106619977392256259918212890625
69: 166509580863811000557423423230896109004106619977392256259918212890625
70: 2166509580863811000557423423230896109004106619977392256259918212890625
71: 62166509580863811000557423423230896109004106619977392256259918212890625
74: 90062166509580863811000557423423230896109004106619977392256259918212890625
75: 890062166509580863811000557423423230896109004106619977392256259918212890625
76: 9890062166509580863811000557423423230896109004106619977392256259918212890625
78: 509890062166509580863811000557423423230896109004106619977392256259918212890625
79: 8509890062166509580863811000557423423230896109004106619977392256259918212890625
80: 38509890062166509580863811000557423423230896109004106619977392256259918212890625
81: 938509890062166509580863811000557423423230896109004106619977392256259918212890625
82: 2938509890062166509580863811000557423423230896109004106619977392256259918212890625
84: 802938509890062166509580863811000557423423230896109004106619977392256259918212890625
85: 9802938509890062166509580863811000557423423230896109004106619977392256259918212890625
86: 69802938509890062166509580863811000557423423230896109004106619977392256259918212890625
87: 169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
88: 8169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
90: 108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
91: 9108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
92: 19108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
93: 319108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
94: 7319108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
97: 3007319108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
98: 53007319108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
99: 953007319108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
100: 3953007319108169802938509890062166509580863811000557423423230896109004106619977392256259918212890625
gp > ##
  ***   last result computed in 32 ms.
gp > n=6; log10=log(10); s=1; while(n<10^100, if(n^2%10^(cntdig=log(n)\log10+1)==n, print(cntdig": "n); s=10^cntdig); n+=s)
1: 6
2: 76
3: 376
4: 9376
6: 109376
7: 7109376
8: 87109376
9: 787109376
10: 1787109376
11: 81787109376
14: 40081787109376
15: 740081787109376
16: 3740081787109376
17: 43740081787109376
18: 743740081787109376
19: 7743740081787109376
21: 607743740081787109376
22: 2607743740081787109376
23: 22607743740081787109376
26: 80022607743740081787109376
27: 380022607743740081787109376
28: 3380022607743740081787109376
29: 93380022607743740081787109376
30: 893380022607743740081787109376
31: 5893380022607743740081787109376
32: 95893380022607743740081787109376
33: 995893380022607743740081787109376
35: 90995893380022607743740081787109376
36: 890995893380022607743740081787109376
37: 3890995893380022607743740081787109376
39: 103890995893380022607743740081787109376
40: 9103890995893380022607743740081787109376
41: 69103890995893380022607743740081787109376
42: 769103890995893380022607743740081787109376
43: 6769103890995893380022607743740081787109376
44: 76769103890995893380022607743740081787109376
45: 576769103890995893380022607743740081787109376
46: 6576769103890995893380022607743740081787109376
47: 76576769103890995893380022607743740081787109376
48: 576576769103890995893380022607743740081787109376
49: 2576576769103890995893380022607743740081787109376
50: 42576576769103890995893380022607743740081787109376
51: 442576576769103890995893380022607743740081787109376
52: 9442576576769103890995893380022607743740081787109376
53: 99442576576769103890995893380022607743740081787109376
54: 999442576576769103890995893380022607743740081787109376
55: 8999442576576769103890995893380022607743740081787109376
56: 88999442576576769103890995893380022607743740081787109376
57: 188999442576576769103890995893380022607743740081787109376
58: 6188999442576576769103890995893380022607743740081787109376
59: 36188999442576576769103890995893380022607743740081787109376
60: 136188999442576576769103890995893380022607743740081787109376
61: 9136188999442576576769103890995893380022607743740081787109376
62: 19136188999442576576769103890995893380022607743740081787109376
63: 419136188999442576576769103890995893380022607743740081787109376
65: 90419136188999442576576769103890995893380022607743740081787109376
66: 490419136188999442576576769103890995893380022607743740081787109376
67: 3490419136188999442576576769103890995893380022607743740081787109376
68: 33490419136188999442576576769103890995893380022607743740081787109376
69: 833490419136188999442576576769103890995893380022607743740081787109376
70: 7833490419136188999442576576769103890995893380022607743740081787109376
71: 37833490419136188999442576576769103890995893380022607743740081787109376
72: 937833490419136188999442576576769103890995893380022607743740081787109376
73: 9937833490419136188999442576576769103890995893380022607743740081787109376
75: 109937833490419136188999442576576769103890995893380022607743740081787109376
77: 90109937833490419136188999442576576769103890995893380022607743740081787109376
78: 490109937833490419136188999442576576769103890995893380022607743740081787109376
79: 1490109937833490419136188999442576576769103890995893380022607743740081787109376
80: 61490109937833490419136188999442576576769103890995893380022607743740081787109376
82: 7061490109937833490419136188999442576576769103890995893380022607743740081787109376
83: 97061490109937833490419136188999442576576769103890995893380022607743740081787109376
84: 197061490109937833490419136188999442576576769103890995893380022607743740081787109376
86: 30197061490109937833490419136188999442576576769103890995893380022607743740081787109376
87: 830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
88: 1830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
89: 91830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
90: 891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
92: 80891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
93: 680891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
94: 2680891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
95: 92680891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
96: 992680891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
97: 6992680891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
98: 46992680891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
100: 6046992680891830197061490109937833490419136188999442576576769103890995893380022607743740081787109376
gp > ##
  ***   last result computed in 31 ms.
gp >

Last fiddled with by LaurV on 2013-02-13 at 09:01
LaurV is offline   Reply With Quote