toI(s=readline()) = parse(Int,s) pYesNo(b) = ifelse(b,"Yes","No") |> println function main() n = toI() solve(n) |> pYesNo end function solve(n) length(factor(n)) ≤ 2 end function factor(n) xs = Pair{Int,Int}[] x = n for i in 2:isqrt(n) x % i == 0 || continue cnt = 0 while x % i == 0 cnt += 1 x ÷= i end push!(xs,i=>cnt) end if isempty(xs) push!(xs,x=>1) end xs end main()