-module a.
-export[m/0].
m()->[io:format("~p~n",[D])||D<-lists:usort([C||A<-lists:seq(2,447),B<-lists:seq(2,17),(C=trunc(math:pow(A,B)))<200000])].