海澜之家男皮西装:用VBScript回答下面问题

来源:百度文库 编辑:高校问答 时间:2024/04/27 19:51:45
若干工人限期干某工程,若工人少5人,要推迟10天完公,若多2人,则可提前2天完工,问原有多少工人,限期几天完成?
1楼错了,连end if 都没写!!!!
2正确,能否补个for循环?

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html xmlns="http://www.w3.org/1999/xhtml">

<script language="vbscript">
Function TT()
Dim Days,Nums
Days=2
Do While Days<300
Days=Days+1
Nums=5
Do While Nums<3000
Nums=Nums+1
If (Days+10)*(Nums-5)=(Days-2)*(Nums+2) Then
TT="限期" & Days & "天完,共" & Nums & "人"
Exit Function
End If
Loop
Loop
TT=":("
End Function

document.write(TT)
//-->
</SCRIPT>

<script language="VBScript">
for i=1 to 100
for j=1 to 100
if (j+10)*(i-5)=(j-2)*(i+2) then alert("i=" + i + "j=" + j)
next
next
</sctipt>
现写的,没调试,错了别怪我,呵呵