编写VF程序统计1~500之间的能被5整除且能被7整除的数的个数-搜答案-神马作文网

PrivateSubCommand1_Click()DimiAsIntegerDimnAsIntegern=0Fori=1To100IfiMod3=0Thenn=n+1Printn;iEndIfNex

s=0fori=1to1000step2s=s+iifs>1000?s-iexitendifendforreturn

s=0k=1whilei

#include<stdio.h>intmain(){floatx[8]={9.2,9.5,9.0,8.9,9.3,9.5,9.1,9.0};floatmax,min;inti;float

clears=0t=0fori=1to100step1ifi%5=0thens=s+it=t+1endifnexti?s,t

clears=0fori=1to500ifi%6=0andi%7=0s=s+iendifendfor"1-500既能被6整除又能被7整除的数之和是：",s

s=0fori=1to100ifmod(i,5)=0s=s+iendif再问：能把源程序写出来吗？我是帮别人做的，我不会vf的语法，谢谢了……

n=""@2,10say"计算n个数的平均值,先输入数值个数n"getnpicture"999999"readn=val(n)DIMENSIONx(n)store0toxs=0fori=1ton@4,

s=0k=0fori=1to100s=s+iifi%2=0k=k+iendifendfor?"s=1+2+3++100=",s?"1-100的偶数和：",k

clears=0input"请输入N的值："tonfori=1tonk=2*i-1r=1forj=1tokr=r*jendforp=1/rs=s+pendfor?"1/1!+1/3!+1/5!+.+1

inta3=0,a7=0,a37=0;for(inti=1;i

*1）有一个数列.前两个数是1,1,第三个数是前两个数之和,以后的每个数都是其前两个数之和.请编写程序,要求输出次数列的前30个数.CLEARDIMENSIONa(30)a[1]=1?"1",a[1]

clears=0fori=1to100k=i+1s=s+i*kendfor"1*2+2*3+3*4+4*5+…+100*101=",s

什么样的年是闰年啊,我忘记了给你修改了下程序,注意ifthen和endif总是成对出现.Forendfor也是成对出现.而且endfor在VF里语法格式貌似是在一起的.set talk&nb

cleari=0dowhilei

clears=0fori=100to700a1=int(i/100)a2=int((i-a1*100)/10)a3=i-a1*100-a2*10k=a1+a2+a3ifk%5=0s=s+1endife

length(find(isprime(1:32765)))再问：还有，isprime的源程序是什么啊，感觉一句话就解决了有点简单，呵呵，有源程序就更好了。第二个绘图的大侠做出来了没啊，第一个按照你的

你要用什麽程序写?java范例vara;varb=0;for(a=50;a再问：vb

1.clearstore0ton1,n1dowhile.t.input"输入一个正数或负数："toxifx>0n1=n1+1elsen2=n2+1endifwait"还要继续输入吗?(Y/N)"toy

inputtoNFORi=1tonifmod(i,7)=0?iENDifENDFo

编写VF程序 统计1~500之间的能被5整除且能被7整除的数的个数