%I
%S 35,65,77,95,119,125,143,155,161,185,203,209,215,221,245,275,287,299,
%T 305,323,329,335,341,365,371,377,395,407,413,425,437,455,473,485,497,
%U 515,527,533,539,545,551,575,581,605,611,623,629,635,665,671,689,695
%N Nonprimes of form 6k+5.
%H Nathaniel Johnston, <a href="/A092256/b092256.txt">Table of n, a(n) for n = 1..10000</a>
%p for k from 0 to 100 do if(not isprime(6*k+5))then printf("%d, ",6*k+5); fi: od: # _Nathaniel Johnston_, May 18 2011
%t Do[If[ !PrimeQ[n]&&Equal[Mod[n, 6], 5 ], Print[n]], {n, 1, 1000}]
%t Select[6*Range[150]+5,!PrimeQ[#]&] (* _Harvey P. Dale_, Jan 23 2012 *)
%Y Cf. A091113, A091300.
%K easy,nonn
%O 1,1
%A _Labos Elemer_, Feb 24 2004
