m=map main=interact$unlines.g.m read.words.m f f ':'=' ';f x=x g[a,b,c]=m show$take a$iterate(\x->x+div(x*c)100)b