当前位置:编程问答 > asp >

编制一个三角形几何参数的ASP程序

问题:1)在第一个页面能够输入三角形的三条边,并允许下拉框选择“面积”、“周长”、“面积和周长”进行计算; 2)在第二个页面根据要求完成计算,并校验三角形的合法性,并判断是否为等腰、等边、直角三角形。
答案:Input.asp 输入边长信息页面:(第一个页面)
<form id="form1" name="form1" method="post" action="result.asp">
  边长一:
  <input type="text" name="a" id="a" />
  <p>边长二:
    <input type="text" name="b" id="b" />
  </p>
  <p>边长三:
    <input type="text" name="c" id="c" />
  </p>
  <p>我要计算:
    <select name="js" id="js">
      <option value="1">周长</option>
      <option value="2">面积</option>
    </select>
    <input type="submit" name="button" id="button" value="马上计算" />
  </p>
</form>
-------------------------------------------------
技术支持:武汉装修在线
result.asp计算结果页面:(第二个页面)
<%
' 判断三边
dim a,b,c
a=cint(request("a"))
b=cint(request("b"))
c=cint(request("c"))
if a+b<=c or a+c<=b or b+c<=a then
%>
<script language=javascript>  
    alert( "请正确输入三角形三边,必须两边大于第三边."  );
    location.href = "Input.asp"  
    </script>
<%
    response.end()
else
    '三角形类型判断
    dim Stype
        if a=b=c then
        Stype="等边三角形"
        elseif a*a + b*b = c*c or a*a + c*c = b*b or b*b+c*c=a*a then
        Stype="直角三角形"
        elseif a=b or a=c or b=c then
        Stype="等腰三角形"
        end if
    '判断计算类型并计算
    dim S,p
        if request("js")="1" then
        S=a+b+c
        else
        p=(a+b+c)/2
        S=Sqr(p*(p-a)*(p-b)*(p-c)) '海伦公式
        end if
'输出结果
response.write("你输入的是:"&Stype&",计算结果:"&S)
end if
%>

上一个:如何让服务器同时运行asp和java程序富阳
下一个:ASP程序设计题:两个列表框,给的路径在左边全部显示,点击左边的会显示在右边。

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,