|
Search: id:A049106
|
|
| |
|
| 1, 2, 37, 14, 1, 1, 2, 2, 88, 926, 247, 104, 114, 4, 196, 754, 214, 9, 289, 571, 47, 32, 2058, 1696, 36, 2428, 68, 3, 2946, 3071, 96, 86, 123, 3, 103, 61, 113, 119, 138, 97, 797, 41153, 30867, 5672, 30892, 644, 1146, 31142, 289, 41893, 499, 896, 109, 33642
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
PROGRAM
|
(ARIBAS): function a049106(a, b: integer); var n, k, j, p, r, d: integer; s: string; begin for n := a to b do s := itoa(n); k := 0; p := 1; for j := 0 to length(s) - 1 do d := atoi(s[j..j]); k : = k + d; p := p*d; end; r := p*k; if r > 0 then if n mod r = 0 then write(n div r, ", "); end; end; end; end; a049106(0, 1220000).
|
|
CROSSREFS
|
Cf. A049101, A049102, A049105.
Sequence in context: A077772 A083150 A066146 this_sequence A042569 A066196 A107180
Adjacent sequences: A049103 A049104 A049105 this_sequence A049107 A049108 A049109
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Olivier Gerard (olivier.gerard(AT)gmail.com)
|
|
EXTENSIONS
|
More terms from Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Dec 13 2001
|
|
|
Search completed in 0.002 seconds
|
