用VBScript编程

2024-12-25 07:17:36
推荐回答(1个)
回答1:

dim dahs
dim xiaohs
dahs=0
xiaohs=0

for i = 1 to 100
if i*4+(100-i)*(1/4)<100 then
dahs=dahs+1
else
dahs=dahs+1
xiaohs=100-dahs
exit for
end if
next

msgbox "大和尚:" & dahs & "个。" & "小和尚:" & xiaohs & "个。",32,"结果"