r=range;p=lambda x:all(x%i for i in r(2,x)) for i in r(2,2001): if p(i)*p(i+2):print`i`+','+`i+2`