#!/usr/bin/env gosh (use math.prime) (define (judge n) (not (length<=? (mc-factorize n) 2))) (let* ((n (read))) (if (judge n) (print "YES") (print "NO")))