pascal程序 定义一函数digit（n,k） 使得他回送整数n的从右边开始数第k个数字的值例如digit(15327,4)=5我写的程序如下program zlx52;varn,k:longint;function digit(n,k:longint):longint;vara,b:longint;begina:=exp(k*ln(10));

pascal程序 定义一函数digit（n,k） 使得他回送整数n的从右边开始数第k个数字的值例如digit(15327,4)=5我写的程序如下program zlx52;varn,k:longint;function digit(n,k:longint):longint;vara,b:longint;begina:=exp(k*ln(10)); 谁能用pascal解这几道题?练习：1.在程序中定义函数digit(n,k),它能分离出整数n从右边数第k个数字,如digit(31859,3)=8,digit(2076,3)=0.2.在程序中定义一个函数check(n,d),如果数字d在整数n中出现,则函数值 在程序中定义一个函数digit(n,k),它能分离出整数n从右边数第k个数字,如digit(31859,3)=8,digit(2076,5)不要百度的,那个程序是错的.可以给pascal完整程序么? 在程序中定义一函数digit(n,k),它能分离出整数n从右边数第k个数字 如 digit(49687,5)=4 digit(2076,5)=0我做的.输入（49687,5）后、总是输出0 为什么阿.var n1,k1:integer;function digit(n,k:integer):longint;var i,j:inte pascal求定义一函数fz3,求1—n之间3的倍数之和.定义一函数fz5,求任意自然数n的各位数字之和. 定义一个函数digit(n,k),要求输入数字n与k,输出数字n上第k位的数.例：digit(15327,4)=5 digit(289,5)=0 用C程序定义一个函数,用于求一个数的立方 pascal两数平均数程序 pascal高精度快速幂程序 用PASCAL编程序1.编写一函数,求出实数的小数部分位数.例如,实数3.14有2位小数；68.6634有4位小数2.编写一函数,求出N!的末尾含有多少个0 pascal程序 输入一个数,求它的绝对值、平方、平方根,前趋,后继 C语言编程,写一函数digit(n,k),它把数n从右边起的第k位数字的值给出来,其中n为正整数,若n的位数不足k则为0,本人刚学了小半年,觉得编的程序还比较简单,可是现在程序越来越不会编了,网上的答 random函数的用法是turbo pascal 中的函数,希望有具体的介绍（有程序最好） free pascal定义一个函数,输出2到n之间的全部完全数(一行一个数) 完全数：因子之和等于它本身的自然数,输入：7输出：6希望过程能简短些, 读入一个整数,统计并输出该数字‘2’的个数.要求定义并调用函数countdigit(number,digit),它的功能是统 求一pascal程序,给出一个整数n,其中n小于等于10000,请统计n的因数的个数. dec在pascal中是什么意思dec以及别的pascal函数 pascal 阶乘BackgroundThe problem is simple.You need to calculate the number of digit of the factorial of K (1