A103652 Three-digit numbers with nonincreasing decimal digits such that the first digit modulo the second digit equals the third digit.

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

Links

Table of n, a(n) for n=1..45.

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

Adjacent sequences: A103649 A103650 A103651 * A103653 A103654 A103655

Keyword

base,easy,fini,nonn,full

Author

Eric Angelini, Jun 14 2005

Extensions

Definition clarified by Harvey P. Dale, Feb 01 2017

Status

approved