let rec a=1+read_int()and($)b c?(t=b+c)g=g=1&()=Printf.printf"%d%c"b" 
".[t/a];t<a&(t$c+1)g;g=0&(b$c+1)1;;(1$1)0