[go: up one dir, main page]

login
A103652
Three-digit numbers with nonincreasing decimal digits such that the first digit modulo the second digit equals the third digit.
0
110, 210, 220, 310, 321, 330, 410, 420, 431, 440, 510, 521, 532, 541, 550, 610, 620, 630, 642, 651, 660, 710, 721, 731, 743, 752, 761, 770, 810, 820, 832, 840, 853, 862, 871, 880, 910, 921, 930, 941, 954, 963, 972, 981, 990
OFFSET
1,1
MATHEMATICA
ndd[n_]:=Module[{idn=IntegerDigits[n]}, Max[Differences[idn]]<1&& idn[[2]] != 0 &&Mod[idn[[1]], idn[[2]]]==idn[[3]]]; Select[Range[100, 999], ndd] (* Harvey P. Dale, Feb 01 2017 *)
CROSSREFS
Sequence in context: A324210 A146081 A249838 * A032614 A120727 A251230
KEYWORD
base,easy,fini,nonn,full
AUTHOR
Eric Angelini, Jun 14 2005
EXTENSIONS
Definition clarified by Harvey P. Dale, Feb 01 2017
STATUS
approved