计算机VF题目.docVIP

*题目：从键盘上输入3个不同的数，将他们从大到小排序。请将 * 下列程序填写完整。 * （提示：利用三个if…endif语句实现，其中交换时用到的 * 临时内存变量为t）。 * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------- set talk off input 请输入第一个数： to a input 请输入第二个数： to b input 请输入第三个数： to c **********Program********** 答案：if ab t=a a=b b=t endif if ac t=a a=c c=t endif if bc t=b b=c c=t endif ********** End ********** ?a,b,c Return Set talk on *题目：求[1,100]内所有能被3或被5整除的数以及个数。 * （提示：利用do while语句实现）。 * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------- Set talk off clear n=0 i=1 **********Program********** 答案：Do while i=100 IF MOD(i,3)=0 .OR. MOD(i,5)=0 **int(i/3) = i/3 .OR. int(i/5) = i/5 ?? i n=n+1 Endif i=i+1 enddo ********** End ********** ? 满足条件的数的个数为:,n Set talk on Return *【程序设计】 *------------------------------------------------------- *题目：求自然数5的阶乘。请将下列程序填写完整。 * （用FOR循环语句） * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------- SET TALK OFF S = 1 M = 1 **********Program********** 答案：FOR M=1 TO 5 S=S*M ENDFOR ********** End ********** ? S SET TALK ON RETURN *【程序设计】 *------------------------------------------------------- *题目：从键盘上输入一个数n，计算n的阶乘。 * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------- Set talk off Input 请输入n的值： to N S=1 **********Program********** 答案：For I=1 to N S=S*I Endfor ********** End ********** ?S Set talk on Return 三、程序设计 共1题 （共计10分） 第1题 （10.0分） 题号:1 *------------------------------------------------------- *【程序设计】 *------------------------------------------------------- *题目：求连乘数1*2*3*4*……，当积大于720时退出程序。 * （提示：利用do while语句实现）。 * 请按照题目要求，在下面编写程序代码。 *------------------------------------------------------- Set talk off s=1 S表示积 I=1 **********Program********** 答案：Do while .T. s=s*i IF S720 EXIT ENDIF I=I+1 Enddo ? s=,s ********** End ********** Set talk on return 三、程