PROG
(MAGMA) [p: p in PrimesUpTo(1300) | forall{x: x in ResidueClassRing(p) | x^5 ne 2}]; // Bruno Berselli, Sep 12 2012
(MAGMA) [p: p in PrimesUpTo(1500) | not exists{x : x in ResidueClassRing(p) | x^5 eq 2} ]; // Vincenzo Librandi, Sep 18 2012