9to:762 do:[:i|(((K:=2)to:i)select:[:p|i\\(p*p)>0or:[K:=9].i\\p=0])size+K=9and:[i printNl]]