您所在位置：主题：请教一个简单程序的流程图画法？
johnbob
[专家分：0] 发布于 2008-03-05 21:28:00
<html>
<head>
<title>跳水评分</title>
<script language="vbscript">
dim a,max,min,s,c
a=cint(inputbox("请输入成绩 :"))
max=a
min=a
c=2
s=a
do while c<=10
a=cint(inputbox("请输入成绩 :"))
s=s+a
if a>max then
max=a
else
end if
if a<min then
min=a
else
end if
c=c+1
loop
s=s-min-max
msgbox s/8
</script>
</head>
<body>
</body>
</html>
那位热心大哥帮帮忙,能帮我画下流程图吗?急用?谢谢
<head>
<title>跳水评分</title>
<script language="vbscript">
dim a,max,min,s,c
a=cint(inputbox("请输入成绩 :"))
max=a
min=a
c=2
s=a
do while c<=10
a=cint(inputbox("请输入成绩 :"))
s=s+a
if a>max then
max=a
else
end if
if a<min then
min=a
else
end if
c=c+1
loop
s=s-min-max
msgbox s/8
</script>
</head>
<body>
</body>
</html>
那位热心大哥帮帮忙,能帮我画下流程图吗?急用?谢谢