|
| |
|
|
A066371
|
|
Smallest positive square that contains n consecutive internal 0's.
|
|
2
| | |
|
|
|
OFFSET
| 0,2
|
|
|
EXAMPLE
| a(2)= 60025 since 60025 is square and contains 2 consecutive internal 0's.
|
|
|
MATHEMATICA
| Do[k = Floor[10^(n/2)]; While[a = Flatten[ Position[ IntegerDigits[k^2], 0]]; Mod[k, 10] == 0 || Length[a] < n || Last[a] - First[a] + 1 != n, k++ ]; Print[k^2], {n, 0, 8} ]
|
|
|
CROSSREFS
| Square roots are in A066392.
Sequence in context: A030629 A056587 A134847 * A016961 A174155 A017033
Adjacent sequences: A066368 A066369 A066370 * A066372 A066373 A066374
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Erich Friedman (efriedma(AT)stetson.edu), Dec 22 2001
|
|
|
EXTENSIONS
| More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 23 2001
|
| |
|
|