vf程序题
- 格式:doc
- 大小:43.50 KB
- 文档页数:12
*题目:从键盘上输入3个不同的数,将他们从大到小排序。
请将* 下列程序填写完整。
* (提示:利用三个if…endif语句实现,其中交换时用到的* 临时内存变量为t)。
* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------set talk offinput "请输入第一个数:" to ainput "请输入第二个数:" to binput "请输入第三个数:" to c**********Program**********if a<bt=aa=bb=tendifif b<ct=bb=cc=tendifif a<ct=aa=cc=tendif********** End **********?a,b,cReturnSet talk on*-------------------------------------------------------*【程序设计】*-------------------------------------------------------*题目:求自然数1至100的和并输出。
请将下列程序填写完整。
* (用DO WHILE语句)按照题目要求,在下面编写程序代码。
*-------------------------------------------------------SET TALK OFFS=0I=1**********Program**********do while i<=100s=s+ii=i+1enddo********** End **********? SSET TALK ONRETURN-------------------------------------------------------*【程序设计】*-------------------------------------------------------*题目:从键盘上输入5个数,求最大的一个数。
* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------Set talk offInput "请输入第一个数:" to x**********Program**********for i=2 to 5 step 1input “请输入第”+str(I,2)+”个数:” to yif x<yx=yendifendfor********** End **********?xSet talk onreturn*-------------------------------------------------------*【程序设计】*-------------------------------------------------------*题目:用DO WHILE 循环语句编写程序。
程序实现的功能为竖向* 显示"优秀学生",横向显示"学生优秀"。
* (提示:利用do while…enddo语句实现,变量A 保存初* 始值"优秀学生",N为循环变量。
),将下列程序填完整。
* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------Set talk offStore "优秀学生"to AClearN=1**********Program**********do while n<8?substr(A,n,2)n=n+2enddo?substr(A,5,4)??substr(A,1,4)********** End **********Return*-------------------------------------------------------*【程序设计】*-------------------------------------------------------*题目:求S=1!+2!+ …+N!。
* (提示:利用FOR循环语句实现, i 为循环始值变量),将* 下列程序填完整。
* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------Clears=1y=0input"请输入N的值" to n**********Program**********for i=1 to n step 1s=s*iy=y+sendfor********** End **********?yReturn*-------------------------------------------------------*【程序设计】*-------------------------------------------------------*题目:用DO WHILE 循环完成1-100之间所有能被13整除的数的个数T并且求和S* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------SET TALK OFFS=0 && S表示求和的结果T=0 && T表示能被13整除的数个数I=1 && I表示循环变量**********Program**********do while i<=100if i%13=0s=s+it=t+1i=i+1elsei=i+1endifenddo********** End **********?S,TSET TALK ON*-------------------------------------------------------*【程序设计】*-------------------------------------------------------*题目:为鼓励存款,对定期存款时间少于1年的,利率为3%,等于* 或大于1年而少于三年的,利率为5%,等于或大于3年而* 少于5年的,利率为7%,五年以上的,利率为9%,请根* 据输入的年限,确定利率。
* (提示:利用do case…endcase语句实现,其中利率用* 内存变量ll)。
* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------Set talk offnx=0@5,10 say '输入定期年限' get nxread**********Program**********do casecase nx<1ll=0.03case nx<3ll=0.05case nx<5ll=0.07otherwisell=0.09endcase@8,10 say llSet talk on*-------------------------------------------------------*【程序设计】*-------------------------------------------------------*题目:求自然数1至100的和并输出。
请将下列程序填写完整。
* (用DO WHILE语句)* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------SET TALK OFFS=0I=1**********Program**********do while i<=100s=s+ii=i+1enddo? SSET TALK ONRETURN*-------------------------------------------------------*【程序设计】*-------------------------------------------------------*题目:从键盘上输入10个整数,将其中的奇数与偶数分别相加后* 输出"奇数和"以及"偶数和"。
请将下列程序填写完整。
* (提示:利用IF…ENDIF语句实现,判断某一个数m的奇偶,* 用m/2=int(m/2) )。
* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------SET TALK OFFCLEARI=1A=0J=0DIME NO(10)DO WHILE I<=10INPUT "输入整数:" TO NO(I)**********Program**********if NO(I)%2=0A=A+ NO(I)elseJ=J+ NO(I)endif********** End **********I=I+1ENDDO?"奇数和:",J,"偶数和:",ARETURN*【程序设计】*-------------------------------------------------------*题目:分别统计zg表中性别为男和性别为女的职工人数。
* 请按照题目要求,在下面编写程序代码。
*-------------------------------------------------------set talk offuse zg**********Program********** count for 性别=’男’ to acount for 性别=’女’ to b********** End ********** useset talk onreturn。