3个回答
展开全部
Function 阶乘(n As Integer) As Double
If n = 1 Then 阶乘 = 1: Exit Function
阶乘 = n * 阶乘(n - 1)
End Function
Private Sub Form_Load()
Dim i As Integer
Dim Sum As Double
For i = 1 To 100
Sum = Sum + 阶乘(i)
Next
Debug.Print Sum
End Sub
VB版
int main(){
long Sum(int n);
long All;
int i;
all=0;
for(i=1;i<=100;i++;)
all=all+sum(i);
cout<<all;
}
long sum(int n){
if(n=1){
sum=1;
return;
}
sum=n*sum(n-1);
}
C++版。。。我C++才学。可能有语法错误。。也没有调试。。没装C++;
自己体会编程思想吧。
If n = 1 Then 阶乘 = 1: Exit Function
阶乘 = n * 阶乘(n - 1)
End Function
Private Sub Form_Load()
Dim i As Integer
Dim Sum As Double
For i = 1 To 100
Sum = Sum + 阶乘(i)
Next
Debug.Print Sum
End Sub
VB版
int main(){
long Sum(int n);
long All;
int i;
all=0;
for(i=1;i<=100;i++;)
all=all+sum(i);
cout<<all;
}
long sum(int n){
if(n=1){
sum=1;
return;
}
sum=n*sum(n-1);
}
C++版。。。我C++才学。可能有语法错误。。也没有调试。。没装C++;
自己体会编程思想吧。
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
#include<stdio.h>
int i,j;
unsigned long s,sum;
s=1;sum=0;
void main()
{
for(i=1;i<=100;i++)
{
for(j=1;j<=i;j++)
s=s*j;
sum=sum+s;
s=1;
}
printf("%u",sum);
}
int i,j;
unsigned long s,sum;
s=1;sum=0;
void main()
{
for(i=1;i<=100;i++)
{
for(j=1;j<=i;j++)
s=s*j;
sum=sum+s;
s=1;
}
printf("%u",sum);
}
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
#include<iostream>
long s,sum;
s=1;sum=0;
int main()
{
for(int i=1;i<=100;i++)
{
for(int j=1;j<=i;j++)
s=s*j;
sum+=s;
s=1;
}
cout<<sum<<endl;
return 0;
}
long s,sum;
s=1;sum=0;
int main()
{
for(int i=1;i<=100;i++)
{
for(int j=1;j<=i;j++)
s=s*j;
sum+=s;
s=1;
}
cout<<sum<<endl;
return 0;
}
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询