杭州交通信息网朝鲜崩溃 谁会接管朝鲜:一道很白痴的程序题目请人编
来源：百度文库 编辑：杭州交通信息网 时间：2024/04/28 14:44:58
我可以给VB的你。
Dim i, j, n, s As Long
For i = 1 to 5
n = 1
for j = 1 to i
n = n * j
Next j
s = s + n
Next i
Pascal的也行
var i,j,n,s:longint;
for i:=1 to 5 do
begin
n:=1;
for j:=1 to i do n:=n*j;
s:=s+n;
end;
s就是所求答案
下面是C的程序：
#include<stdio.h>
main()
{
float sum=0,temp=1;
int i,j;
printf("请输入开始数即i的值：");
scanf("%d",&i);
printf("请输入结尾数即j的值：");
scanf("%d",&j);
for(i=i;i<=j;i++)
{
temp=temp*i;
sum=sum+temp;
}
printf("所求的阶乘和的结果为：%e\n",sum); /*这里的e是为了输出科学计数法，可以改成f*/
}
这个程序和楼上的区别就是可以求任意两个数之间的阶乘的和。为了使结果不超出范围故sum没有用int或者long来定义。且在最后输出上用的是科学计数法。
要什么语言编？
说清楚，我好下手。
这是c:
#include<stdio.h>
long rmulti(long n)
{long i,r=1,s=0;
for(i=1;i<=n;i++)
{r*=i;
s+=r;
}
return s;
}
main()
{int n;
printf("please input n:");
scanf("%ld",&n);
printf("\n%ld",rmulti(n));
getch();
}
输入5
输出153