m:-readln([N]),M is -N,between(M,N,X),(between(M,N,Y),(X*X+Y*Y>N*N -> C=32;C=42),\+put(C);\+nl).