Pascal语言:现在输入N和D,如果N能被D整数,则保留一位小数,如