(while 1(n-of(if(< 47(= c(readb))58)(- c 48)1)writeb.c))