Question

VB编程：1使用公式e=1+1/1!+1/2!+1/3!+……求e的近似值，要求计算到最后一项小于10^-8为止

2.在100-200之间的数中找出同时满足除3余2,除5余3和除7余2的所有整数（提示循环）
3.编写程序，产生50个互不相同的10-99的随机整数，统计各数值段（10-19.20-29……，90-99）有多少个数并输出。
帮帮忙！！今晚要~~！！！！

Answer 1

1.
#include <stdio.h>
#include <math.h>
double fact(double num)
{
if(num>1)
{
return num*fact(num-1);
}
else
{
return 1;
}
}
int main()
{
double i,sum;
i=sum=0.0;
while(1)
{
sum+=1/fact(i);
i++;
if(fact(i)>100000000)
{
break;
}
}
printf("sum=%lf\n",sum);
return 0;
}
2.
#include <stdio.h>
int main()
{
int i;
for(i=100;i<=200;1++)
{
if(i%3==2&&i%5==3&&i%7==2)
printf("%d\n",i);
}
return 0;
}
3.
#include <stdio.h>
#include <stdlib.h>
int main()
{
int i,sum1,sum2,sum3,sum4,sum5,sum6,sum7,sum8,sum9;
sum1=sum2=sum3=sum4=sum5=sum6=sum7=sum8=sum9=0;
int num[50];
for(i=0;i<50;i++)
{
num[i]=rand()%100;//输出数在0~99之间
}
for(i=0;i<50;i++)
{
if(num[i]>=10&&num[i]<=19)
{
sum1++;
}
if(num[i]>=20&&num[i]<=29)
{
sum2++;
}
if(num[i]>=30&&num[i]<=39)
{
sum3++;
}
if(num[i]>=40&&num[i]<=49)
{
sum4++;
}
if(num[i]>=50&&num[i]<=59)
{
sum5++;
}
if(num[i]>=60&&num[i]<=69)
{
sum6++;
}
if(num[i]>=70&&num[i]<=79)
{
sum7++;
}
if(num[i]>=80&&num[i]<=89)
{
sum8++;
}
if(num[i]>=90&&num[i]<=99)
{
sum9++;
}
}
printf("%d\n%d\n%d\n",sum1,sum2,sum3);
printf("%d\n%d\n%d\n",sum4,sum5,sum6);
printf("%d\n%d\n%d\n",sum7,sum8,sum9);
return 0;
}