|
| |
| |
|
|
|
1, 5, 55, 220, 2420, 79860, 878460, 28989180, 956642940, 32525859960, 1073353378680, 35420661496440, 1168881829382520, 38573100369623160, 1234339211827941120, 40733193990322056960, 4154785787012849809920
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
PROG
| (PARI) {print1(a=1, ", "); for(n=2, 17, k=floor(log(a)/log(10))+1; s=n; t=s+1; m=floor(log(s)/log(10))+1; d=k-m; s=s*10^d; t=t*10^d; b=1; while(b>0, q=floor(s/a); while(b>0&&(p=q*a)<t, if(p>=s&&issquare(p), print1(sqrtint(p), ", "); b=0, q++)); s=10*s; t=10*t); a=p)}
|
|
|
CROSSREFS
| Cf. A078215, A078815.
Sequence in context: A015221 A035305 A057722 * A014700 A103326 A060558
Adjacent sequences: A078213 A078214 A078215 * A078217 A078218 A078219
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 22 2002
|
|
|
EXTENSIONS
| Edited and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Dec 06 2002
|
| |
|
|
