

A082800


Smallest multiple of 4 beginning with n.


6



12, 20, 32, 4, 52, 60, 72, 8, 92, 100, 112, 12, 132, 140, 152, 16, 172, 180, 192, 20, 212, 220, 232, 24, 252, 260, 272, 28, 292, 300, 312, 32, 332, 340, 352, 36, 372, 380, 392, 40, 412, 420, 432, 44, 452, 460, 472, 48, 492, 500, 512, 52, 532, 540, 552, 56
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..1000


MATHEMATICA

Table[If[Mod[n, 4]==0, n, If[Mod[10 n, 4]==0, 10 n, 10 n + 4  Mod[10 n, 4]]], {n, 56}] (* Ray Chandler, Feb 09 2014 *)


CROSSREFS

Cf. A082799, A082801, A082802, A082803, A082804.
Sequence in context: A256883 A124672 A109547 * A026041 A082296 A187766
Adjacent sequences: A082797 A082798 A082799 * A082801 A082802 A082803


KEYWORD

nonn,base,easy


AUTHOR

Amarnath Murthy, Apr 20 2003


EXTENSIONS

Extended by Ray Chandler, Feb 09 2014
Typo in Mathematica program fixed by Vincenzo Librandi, Feb 10 2014


STATUS

approved



