OFFSET
0,2
FORMULA
MATHEMATICA
Select[Table[Times@@Range[n, n+5]/Total[Range[n, n+5]], {n, 0, 100}], IntegerQ] (* Harvey P. Dale, May 09 2018 *)
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
Patrick De Geest, May 15 1998
STATUS
approved