编写递归函数过程，将十进制正整数d转换成r（～）进制的字符串Trans$（d，r）