(loop(format t"~D
"(mod-expt(read)(read)10)))