(loop(format t"~D
"(loop for i to(setf a(read)b(read))sum(*(expt -1 i)(/(! b)(! i)(!(- b i)))(expt(- b i)a)))))