for n=100 to 200; Factor[2^n - 1];next n