编程实现三个数阶乘之和

---

⑴编写一个vb函数过程,计算1~10的阶乘之和,并将运行结果输出在窗体上

---

参考代码：

PrivateSubCommand1_Click()

  DimiAsInteger

  Fori=1To10

  Sum=Sum+jc(i)

  Next

  MsgBoxSum

  EndSub

  函数jc(aAsInteger)

  jc=1

  Fori=1

  jc=jc*i

  下一步

  结束函数

---

⑵c语言求一个三位数各个位数的阶乘

---

代码如下：
/*
*输入一个三位数，计算其能被整除的数字之和
*/
#include
//计算a的阶乘
intfac(inta)
{
if(a==0)
return1;
否则
return*fac(a-1);
}
//主函数
intmain()
{
intnum;
inta;
intsum=0;
do{
printf('请输入三位数：');
scanf("%d",&num);
}while(num<100||num>999);
while(num>0){
a=num%10;
num=(num-a)/10;
sum+=fac(a);
}
printf("各位数字的阶乘之和为%d\n",sum);
return0;
}
运行程序，输入输出如下：
请输入一个三位数：123
每个数字的阶乘和是9