考试网 >> IT认证 >> 等级 >> 等级动态 >> 全国计算机等级二级QBASIC上机编程题题型

全国计算机等级二级QBASIC上机编程题题型

发布时间：2006-07-25 12:00 点击：

分页:[1] 2 3 4 5 下一页

第1题

　　

　　编制程序PROG1.BAS其功能是：计算表达式1!+2!+3!+...+k!,计算k=6时的值。请根据程序的需要将函数FACT补充完整。

　　

　　Prog1.bas

　　

　　DECLARE FUNCTION FACT(t)

　　

　　OPEN "QB12.DAT" FOR OUTPUT AS #1

　　

　　sum = 0

　　

　　INPUT k

　　

　　FOR i = 1 TO k

　　

　　 sum = sum + FACT(i)

　　

　　NEXT

　　

　　PRINT "sum="; sum

　　

　　PRINT #1, sum

　　

　　CLOSE #1

　　

　　END

　　

　　

　　FUNCTION FACT(t)

　　

　　

　　

　　END FUNCTION

　　

　　编程题参考答案程序

　　 DECLARE FUNCTION FACT (t)

　　OPEN "QB12.DAT" FOR OUTPUT AS #1

　　sum = 0

　　INPUT k

　　FOR i = 1 TO k

　　sum = sum + FACT(i)

　　NEXT

　　PRINT "sum="; sum

　　PRINT #1, sum

　　CLOSE #1

　　END

　　

　　FUNCTION FACT (t)

　　mm = 1

　　FOR j = 1 TO t

　　mm = mm * j

　　NEXT

　　FACT = mm

　　END FUNCTION

　　

　　

　　

　　第2题

　　编制程序PROG1.BAS其功能是：求 1*5*10*15*...*30 的准确值，将结果保存在文件QB22.DAT中。请将程序补充完整。

分页:[1] 2 3 4 5 下一页

版权申明:未经书面授权请勿转载本站信息!!作品版权归所属媒体与作者所有!!

发表评论：

匿名发表

用户名:

查看评论

您将承担一切因您的行为、言论而直接或间接导致的民事或刑事法律责任
留言板管理人员有权保留或删除其管辖留言中的任意内容
本站提醒：不要进行人身攻击。谢谢配合。