& lt%
Dim a1
a 1 =(request . form(" text 1 ")'從表單中獲取數據。
如果a 1 & gt；=0和a 1 & lt；那就60
回應。寫(“失敗”)
else if a 1 & gt；=60和a 1 & lt；那麽=89
回應。寫(“通過”)
else if a 1 & gt；=90和a 1 & lt；=100
回應。寫(“優秀”)
其他
回應。寫(“分數無意義”)
如果…就會結束
% & gt
第二個問題:
& lt%
Dim a1
a1=101*50
回應。寫(" a1 ")
% & gt