全国计算机等级考试二级《web程序设计》习题8

下面是一个函数，用来返回从a到b的立方和，请填写其中的空格。

　　<%

　　Function Cube(a，b)

　　    Dim I，Sum

　　    Sum=_______         

　　    For _______

　　           Sum=______                

　　    Next

　　         _____ =Sum

　　End Function

　　%>

　　答：

　　0  

　　I= a To b 

　　Sum+I^3       

　　Cube

编写一段vbScript程序，实现以下功能。

　　表单输入n值和m值，然后本页面收集表单数据，最后输出（n-1）!+（m+n）!/（m+1）!表达式的计算结果。补全如下代码：

　　提示：阶乘可用函数计算

　　<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

输入数据M 

数据数据n 

　　<%

　　if Request(_____)<>"" and Request(_____)<>"" then

　　dim m，n，a，b，c

　　m=clng(Request("t1"))

　　n=clng(Request("t2"))

　　a=______

　　b=______

　　c=_______

　　d=a+c/b

　　response.write ("表达式(n-1)!+(n+m)!/(m+1)!的计算结果为 "&d )

　　end if

　　function jc(___) 

　　dim j

　　j=

　　for i=1 to ____

　　j=

　　next

　　jc=

　　End function

　　%>

　　答：

　　"t1"

　　"t2"

　　jc(n-1)

　　jc(m+1)

　　jc(n+m)

　　intNum

　　intNum

　　1

　　j*i

　　j