(while(ash 1(-(mod(read)36)1))=> x(print"-"x" to "(- x 1)))