VFP笔试试题复习共12页Word格式.docx
- 文档编号:16799618
- 上传时间:2022-11-26
- 格式:DOCX
- 页数:7
- 大小:19.37KB
VFP笔试试题复习共12页Word格式.docx
《VFP笔试试题复习共12页Word格式.docx》由会员分享,可在线阅读,更多相关《VFP笔试试题复习共12页Word格式.docx(7页珍藏版)》请在冰豆网上搜索。
xià
n)
=10,P=P+1/(M*M),M=M+1,ENDDO,?
”P=”,P,OUT=P
73输出10到50之间所有(suǒyǒu)能被7整除的数(用dowhile实现)并将这些数存入out中
i=10,S=0,dowhilei<
=50,ifi%7=0,?
i,S=S+i,endif,i=i+1,enddo,OUT=s
79用子程序求出1~15之间的能被3整除的整数的平方和。
将结果存入变量OUT中,要求用for循环(xú
nhuá
n)实现。
N=1,S=0,FORN=1TO15,IFN%3=0,S=S+N*N,ENDIF,ENDFOR,?
S,SETTALKON,OUT=S
86用循环求出1~15之间能被3整除的整数的阶乘和存入变量out中,要求用for循环语句
T=1,FORN=1TO15,T=T*N,IFN%3=0,OUT=OUT+T,ENDIF,ENDFOR,?
OUT
87从键盘输入一个整数,输出所有能整除该数,并且(bì
ngqiě)本身也能被3整除的数的和。
(eg输入6,输出3,6)结果存于变量x中,要求用for实现。
FORN=1TOA,IFA%N=0.AND.N%3=0,?
N,x=x+N,ENDIF,ENDFOR
71求出并显示(xiǎnshì
)3!
+4!
+5!
的值,将结果存入变量out中,要求用for编程。
S=0,FORI=3TO5,p=1,FORJ=1TOI,p=p*J,ENDFOR,S=S+p,endfor,?
“3!
的值是:
”,s,OUT=S
93求1~200间的所有偶数(ǒushù
)的和,结果输入变量OUT中,要求用for循环语句实现。
S=0,FORI=1TO200,IFI/2=INT(I/2),S=S+I,ENDIF,ENDFOR,?
S,OUT=S
97编程打印一数列,前两个数是0、1,第三个数是前两个数之和,以后每个数都是其前两个数之和。
编程求出第20个数,将结果存入(cú
)out中,要求用for循环语句实现
a=0,B=1,fori=3to20,c=a+b,a=b,b=c,endfor,?
”c=”,c,out=c
455编程求sum=3-33+333-3333+33333
S=0,t=0,d=3,fori=1to5,t=t+d,s=s+t*(-1)^(i+1),d=d*10,endfor,out=s,?
out
454求sum=1/3+1/33+1/333+1/3333+1/33333
S=0,t=0,d=3,fori=1to5,t=t+d,s=s+1/t,d=d*10,endfor,out=s,?
450fibonacci数列(shù
liè
)第28项的值。
第一项为1,第二项也为1,。
。
Store1tof1,f2,f=f1+f2,fori=3to27,f1=f2,f2=f,f=f1+f2,endfor,out=f,?
449s=2/1+3/2+5/3+8/5+13/8+21/13+34/21
f1=1,f2=1,s=0,fori=1to7,f3=f1+f2,f1=f2,f2=f3,s=s+f2/f1,endfor,out=s,?
444a1=1,a2=1/(1+a1),a3=1/(1+a2)……..an=1/(1+a(n-1))当n=10,求s=a1+a2+…….+a10
a=1,s=1,fori=1to9,a=1.0/(1+a),s=s+a,endfor,out=s,?
445a1=1,a2=1/(1+a1),a3=1/(1+a2)……..an=1/(1+a(n-1))当n=10,求s=a1-a2+a3-a4…….-a10
a=1,s=1,fori=1to9,a=1.0/(1+a),s=s+a*(-1)^i,endfor,out=s,?
435sum=3+33+333+3333+33333+333333
S=0,t=0,d=3,fori=1to5,t=t+d,s=s+t,d=d*10,endfor,out=s,?
431分数(fēnshù
)序列2/1,3/2,5/3,8/5,13/8,21/13……..前20项之和
F1=1,f2=1,s=0,fori=1to20,f3=f1+f2,f1=f2,f2=f3,s=s+f2/f1,endfor,out=s,?
422a1=1,a2=1/(1+a1),a3=1/(1+a2)……..an=1/(1+a(n-1))求a10
a=1,fori=1to9,a=1.0/(1+a),endfor,out=s,?
427y=1-1/3+1/5-1/7+1/9
S=1,fori=1to4,s=s+(-1)^i/(2*i+1),endfor,out=s,?
428y=1-1/2+1/4-1/6+1/8-1/10
S=1,fori=1to5,s=s+(-1)^i/(2*i),endfor,out=s,?
4.2.4最大(小)值
77任意(rè
nyì
)数三个数从大到小排序
Ifx<
y,k=x,x=y,y=k,endif,Ifx<
z,k=x,x=z,z=k,endif,Ify<
z,k=y,y=z,z=k,endif,?
x,y,z,a=x,b=y,c=z
94输入(shūrù
)三个数找出最大和最小
Ma=a,mi=a,ifb>
a,ma=b,endif,ifmi>
b,mi=b,endif,ifma<
c,ma=c,endif,ifmi>
c,mi=c,endif
439求1*1+2*2+。
+n*n<
=1000中满足条件的最大的n
S=0,n=1,dowhiles<
=1000,n=n+1,s=s+n*n,enddo,out=n-1,?
out
4.2.5字符(zì
fú
)处理类
74在屏幕上纵向(zò
nɡxià
nɡ)输出"
计算机等级考试"
S=”计算机等级(děngjí
)考试”,i=1,dowhilei<
14,?
”SUBS(S,I,2)”,IFI=9,Y=SUBS(S,I,2),endif,i=i+2,enddo
91输入一个三位数,将个十百位顺序拆开分别存入(cú
)变量s中,用加号分隔。
如输入345分开后为要求用dowhile实现。
dowhilen>
10,a=n%10,s=”+”+str(int(a),1)+s,n=n-a,n=n/10,enddo,s=subs(s,2,len(s))
426编程统计一个长度为2的字符串在另一个字符串中出现的次数。
例如。
将结果存入out中要求用dowhile实现
I=0,n=0,dowhilei<
=len(str1)-1,ifstr2=substr(str1,I,2),n=n+1,endifi=i+1,enddo,out=n,?
85从键盘输入一个汉字字符串,送入变量s中,将它逆向存入变量Y中,如:
输入"
计算机考试"
,输出(shūchū)为"
试考机算计"
,要求用for循环(xú
Forn=1tolen(s)-1step2,y=y+subs(s,len(s)-n,2),endfor
416过滤已存在字符串变量str中的内容,只保留串中的字母字符,并统计新生成(shēnɡché
nɡ)串中包含的字母个数。
将生成的结果字符串存入变量out中。
N=len(str),L=0,S=””,fori=1ton,ifsubstr(str,i,1)<
=’Z’andsubstr(str,i,1)>
=’A’orsubstr(str,i,1)<
=’z’andsubstr(str,i,1)>
=’a’,L=L+1,S=S+substr(str,i,1),endif,endfor,?
”s=”,s,out=s
456编程将一个由四个数字组成的字符串转换为每两个数字间有一个字符"
*"
的形式输出。
例如输入(shūrù
)"
4567"
,应输出"
4*5*6*7"
将结果存入变量out中。
Spc=”*”,s=””,fori=1tolen(str)-1,s=s+substr(str,i,1)+spc,endfor,s=s+substr(str,i,1),out=s,?
out,len(out)
436编程将一个由四个数字组成的字符串转换为每两个数字间有一个空格的形式输出。
例如输入"
4567"
,将结果存入变量out中,要求用for循环语句实现。
Spc=space
(1),s=””,fori=1tolen(str)-1,s=s+substr(str,i,1)+spc,endfor,s=s+substr(str,i,1),out=s,?
4.2.6图形(tú
xí
ng)题
92计算并在屏幕上显示(xiǎnshì
)乘法表,将各部分结果相加存入变量z中,要求用dowhile实现。
X=1,?
dowhilex<
=9,y=1,dowhiley<
=x,?
?
str(y,1)+’x’+str(x,1)+’=’+str(x*y,2)+’’,z=z+x*y,y=y+1,enddo,?
x=x+1,enddo
75输出图形**********(要求使用for语句,利用双重循环语句)要求:
将第三行的所有(suǒyǒu)字符存入变量s中
Fori=1to4,forj=1toi,?
”*”,endfor,?
endfor
82利用循环(xú
n)程序输出图形:
1222.33333.4444444并将输出第三行存入变量s中。
N=1,forn=1to4,?
space(4-n),form=1to2*n-1,?
str(n,1),endfor,endfor,settalkon,s=”33333”
84利用循环输出图形:
4333222221111111并将最后一行存入变量s中。
Forn=1to4,?
str(4-n+1,1),endfor,endfor,s=”1111111”
4.2.7数组题
452求max-min=
Storearray
(1)tomax,min,fori=1to10,ifarray(i)>
max,max=array(i),endif,ifarray(i)<
min,min=array(i),endif,endfor,out=max-min,?
451求max+min
min,min=array(i),endif,endfor,out=max+min,?
446找出正整数中的最小的偶数(ǒushù
M=100,fori=1to10,ifarray(i)%2=0,ifmin>
array(i),min=array(i),endif,endif,endfor,out=min,?
447找出正整数中的最小的奇数(jīshù
Min=array
(1),fori=1to10,ifarray(i)%2!
=0,ifmin>
448找出正整数中的最大的奇数(jīshù
Max=array
(1),fori=1to10,ifarray(i)%2!
=0,ifmax<
array(i),max=array(i),endif,endif,endfor,out=max,?
453求max*min
min,min=array(i),endif,endfor,out=max*min,?
429求一组数中大于平均值的个数
S=0,fori=1to10,s=s+array(i),endfor,s=s/10,n=0,forj=1to10,ifarray(j)>
s,n=n+1,endif,endfor,out=n,?
430找出正整数中的最大的偶数(ǒushù
Max=array
(1),fori=1to10,ifarray(i)%2=0,ifmax<
4.2.8其他(qí
tā)类
69输入三角形的边长,输入边长满足两边之和大于第三边,且为正值(zhè
nɡzhí
)。
计算并输出三角形的面积s;
若不满足以上条件,显示输出"
不能构成三角形"
将面积值存入变量area中。
S=(a+b+c)/2,ifa+b>
candb+c>
aanda+c>
banda>
0andb>
0andc>
0,area=sqrt(s*(s-a)*(s-b)*(s-c)),else,?
"
不能构成(gò
uché
ng)三角形"
area=-1,endif
72编程求p_-1*(1*2)*(1*2*3)*........*(1*2*3*.....*N).
P=1,fori=1ton,q=1,forj=1toi,q=q*j,endfor,p=p*q,endfor,out=p
80从键盘输入一个数,如果该数字大于0,通过子程序输出该数字作为半径的圆面积;
如果该数字小于等于0,则输出"
不能作为圆的半径"
将结果存入变量out中
Ifa>
0,out=a*a*3.14,else,out=-1,endif
166计算下列分段函数:
当输入x时,显示输出(shūchū)y要求用docase实现
Docase,casex<
1,y=x*3,caex>
=1andx<
10,y=x^2,otherwise,y=7*x-4,endcase,?
y
415判断一个(yīɡè
)三位数是否为"
水仙花数"
,输出判断结果。
是为1,否为0。
Bw=int(n/100),sw=int((n-bw*100)/10),gw=n%10,ifn=bw*bw*bw+sw*sw*sw+gw*gw*gw,out=1,else,out=0,endif,?
418判断(pà
nduà
n)整数w的各位数字平方之和能否被5整除,可以则返回1,否则返回0
S=0,dowhilew>
0,s=s+(w%10)*(w%10),w=int(w/10),enddo,ifs%5=0,out=1,else,out=0,endif,?
419求一个(yīɡè
)大于10的n位整数的后n-1位的数
N=0,i=1,dowhile(w>
10),n=n+i*(w%10),w=int(w/10),i=i*10,enddo,?
n,out=n
420求对某一正数的值保留两位小树,并对第三位进行四舍五入,
i=0,i=int((h*1000)%10),ifi>
=5,out=(h*100+1)/100,else,out=int(h*100)/100,endif,?
423求自然数345各位数字的积
S=1,dowhilen>
0,d=n%10,s=s*t,n=int(n/10),enddo,out=s,?
432fibonacci数列(shù
)前28项的和。
Store1tof1,f2,f=f1+f2,fori=3to28,k=k+f,f1=f2,f2=f,endfor,out=k,?
434变量x为不超过(chāoguò
)五位的正整数,求x的位数
Docase,casex>
9999,place=5,casex>
999,place=4,casex>
99,place=3,casex>
9,place=2,otherwise,place=1,endcase,out=place,?
438求一个(yīɡè
)整数,它加上一百后是一个完全平方数,再加上168有事一个完全平方数
i=1,dowhilei<
100000,x=int(sqrt(i+100)),y=int(sqrt(i+268)),ifx*x=i+100andy*y=i+268,exit,endif,i=i+1,enddo,out=I,?
443求对某一正数的值保留(bǎoliú
)3位小数,并对第四位进行四舍五入,
i=0,i=int((h*10000)%10),ifi>
=5,out=(h*1000+1)/1000,else,out=int(h*1000)/1000,endif,?
458计算正整数num的各位上的数字之积,
S=1,dowhilenum<
0,s=s*(NUM%10),NUM=INT(NUM/10),enddo,out=s,?
内容摘要
(1)第一项为1,第二项也为1,
(2)第一项为1,第二项也为1,
(3)out
,输出为"
,要求用for循环实现
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VFP 笔试 试题 复习 12