想做一个按照自己设定的公式计算程序，请朋友们帮忙。

youfengjiang 2009-06-07 07:01:43

我对对程序一直感兴趣，没有专业学过，现在想做一个按照自己设定的公式计算程序，请朋友们帮忙。


1、要求用使用者输入：总面积、商用面积、住宅面积、七层以下面积、八层以上面积、第一层面积、住宅栋数、商用栋数、层数

2、散装水泥专项资金2元每平方米
新型墙体发展基金8元每平方米
城市基础设施配套费（0-60）总面积<100000 按60元每平方米收;总面积在100000-200000之间的按40元每平方米收;总面积大于200000不收费.楼层超过13层也不收费。

人防易地建设费：当层数为9层以下时28元每平方米，当10层以上时按第一层面积1400元每平方米

白蚁防治费：七层以下面积1.2元每平方米、八层以上面积0.84元每平方米

房产登记费：住宅栋数每栋70元、商用栋数每栋500元

房屋转让手续费商用面积3.5元每平方米、住宅面积2.1元每平方米

建筑垃圾处理费1.8元每平方米
利用城建档案资料费1.4元每平方米
城市规划技术服务费0.84元每平方米
施工图及抗震设计审查费6层以下0.94元每平方米;7层以上1.11元每平方米（此项费用如低于1500元，按1500元收）
防雷装置审核费0.1元每平方米
防雷装置监督验收费0.9元每平方米

(收费标准有二种：一种是固定，第二种是根据上面输入的层数自动对应的标准如：12层楼以上只收50 13层以不收费。)

3、在dreamweaver 或另的程序中设计下固定的计算方式如下：


（散装水泥专项资金2元每平方米+新型墙体发展基金8元每平方米+城市基础设施配套费+建筑垃圾处理费1.8元每平方米+利用城建档案资料费1.4元每平方米+城市规划技术服务费

0.84元每平方米+防雷装置审核费0.1元每平方米+防雷装置监督验收费0.9元每平方米）*总面积

+

如果层数为9层以下时总面积*28元每平方米;如果10层以上第一层面积*1400元每平方米

+
房屋转让手续费商用面积*3.5元每平方米
+住宅面积*2.1元每平方米

+
房产登记费住宅栋数*70元+商用栋数*500元


+施工图及抗震设计审查费,6层以下总面积*0.94元每平方米或7层以上总面积*1.11元每平方米（此项费用如低于1500元，按1500元收）

=总收金额
...全文
142 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
youfengjiang 2009-06-08
  • 打赏
  • 举报
 回复
好了：


<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />

<title> </title>

<script type="text/javascript">


function oper(c)
{
if(c.toString().indexOf(".")==-1)
{
return c;
}else
{
return parseInt(c)+1;
}
}
function result1()
{
var a = document.getElementById("zmj_1").value;
/*a总面积b商用面积c住宅面积d七层以下面积e八层以上面积f基层面积g住宅栋数h商用栋数i层数 */
var b = document.getElementById("symj_1").value;
var c = document.getElementById("zzmj_1").value;
var d = document.getElementById("down7_1").value;
var e = document.getElementById("up8_1").value;
var f = document.getElementById("jcmj_1").value;
var g= document.getElementById("zzds_1").value;
var h = document.getElementById("syds_1").value;
var i = document.getElementById("cs_1").value;
var result = "";
var q =1;
var x =1;/*图纸审查价格*/
var n =0;/*图纸审查费*/
var m =0;/*城市配套费价格*/

if (i>6) {x=1.11;} else{x=0.94;}
if (x*a<1500) {n=1500;} else{n=x*a;}



if (a<100000) {m=a*60;}
else {
if(a<200000) {m=a*40} else {m=0;}
}


/*这里是判断p的值的如何表达下面的意思 (a <100000p=60; <100000a <200000p=40;a>200000p=0) 或i>12p=0;
意思 配套费的价格：如果开发低于10万平方米按60元每平方收，如果在10-20万平方米之间按40元收，超过20万不收。或超过13层楼也不收*/

if (i>10)
{ q=1400*f;}
else{q=28*a;}/*这里加上判断q人防费*/


if(i=="")
i=0;
if(isNaN(a) || isNaN(b) || isNaN(c) || isNaN(d) || isNaN(e) || isNaN(f) || isNaN(g) || isNaN(h) || isNaN(i))
{
result = "请输入数字！";
document.getElementById("res_1").style.color = "red";
}else{
result =(2+8+1.4+0.84+1+0)*a+1.2*d+0.7*e+70*g+500*h+b*3.5+c*2.1+q+n+m;
/* (2+8+1.4+0.84+1+0)*a+1.2*d+0.7*e+70*g+500*h+b*3.5+c*2.1+q+n+m*/
/*(散装+墙改+档案+规划技术服务+气象+渣土费)*a+白蚁+房产登记+房产交易费 +q人防+x图纸审查+城市配套费 */
document.getElementById("res_1").style.color = "green";
}

document.getElementById("res_1").innerText = "总价："+result;
}


</script>
</head>
<body>
建筑工程在中心须交纳总价计算
<TABLE border="1" cellpadding="0" cellspacing="0" bordercolor="#FF00FF">
<TR>
<TD>总面积： </TD>
<TD> <INPUT TYPE="text" id="zmj_1" value="1000"> </TD>
</TR>
<TR>
<TD>商用面积： </TD>
<TD> <INPUT TYPE="text" id="symj_1" value="0"> </TD>
</TR>
<TR>
<TD>住宅面积： </TD>
<TD> <INPUT TYPE="text" id="zzmj_1" value="0"> </TD>
</TR>
<TR>
<TD>七层以下面积： </TD>
<TD> <INPUT TYPE="text" id="down7_1" value="0"> </TD>
</TR>
<TR>
<TD>八层以上面积： </TD>
<TD> <INPUT TYPE="text" id="up8_1" value="0"> </TD>
</TR>
<TR>
<TD>基层面积积： </TD>
<TD> <INPUT TYPE="text" id="jcmj_1" value="0"> </TD>
</TR>
<TR>
<TD>住宅栋数： </TD>
<TD> <INPUT TYPE="text" id="zzds_1" value="0"> </TD>
</TR>
<TR>
<TD>商用栋数： </TD>
<TD> <INPUT TYPE="text" id="syds_1" value="0"> </TD>
</TR>
<TR>
<TD>层数： </TD>
<TD> <INPUT TYPE="text" id="cs_1" value="1"> </TD>
</TR>
<TR>
<TD> <input type="button" value="开始计算" onclick="result1()" /> </TD>
<TD>
<span id="res_1"> </span>
</TD>
</TR>
</TABLE>
<p> </p>
<hr />
<p>备注：(散装+墙改+档案+规划技术服务+气象+渣土费)*总面积+白蚁费+房产登记费+房产交易费费 +人防费+图纸审查费+城市配套费</p>
<p>  </p>
<p>(2+8+1.4+0.84+1+0)*总面积+1.2*七层以下面积+0.7*八层以上面积+70*住宅栋数+500*商用栋数+商用面积*3.5+住宅面积*2.1+人防费+图纸审查费+城市配套费</p>
</body>
</html>
youfengjiang 2009-06-07
  • 打赏
  • 举报
 回复

朋友请给我改一下，谢谢
1、x\p\q如何定义给加上。我不会。
2、*p配套费的价格：如果开发低于10万平方米按60元每平方收，如果在10-20万平方米之间按40元收，超过20万不收。或超过13层楼也不收*/如何表述出来


<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<title></title>

<script type="text/javascript">


function oper(c)
{
if(c.toString().indexOf(".")==-1)
{
return c;
}else
{
return parseInt(c)+1;
}
}
function result1()
{
var a = document.getElementById("zmj_1").value;
/*a总面积b商用面积c住宅面积d七层以下面积e八层以上面积f基层面积g住宅栋数h商用栋数i层数 */
var b = document.getElementById("symj_1").value;
var c = document.getElementById("zzmj_1").value;
var d = document.getElementById("down7_1").value;
var e = document.getElementById("up8_1").value;
var f = document.getElementById("jcmj_1").value;
var g= document.getElementById("zzds_1").value;
var h = document.getElementById("syds_1").value;
var i = document.getElementById("cs_1").value;
var result = "";
if (i>6)
{x=1.11;}
else{x=0.9;}

这里是判断p的值的如何表达下面的意思 (a<100000p=60; <100000a<200000p=40;a>200000p=0) 或i>12p=0;
意思 /*p配套费的价格：如果开发低于10万平方米按60元每平方收，如果在10-20万平方米之间按40元收，超过20万不收。或超过13层楼也不收*/

if (i>10)
{ q=1400*f;}
else{q=28*a;}/*这里加上判断q人防费*/


if(i=="")
i=0;
if(isNaN(a) || isNaN(b) || isNaN(c) || isNaN(d) || isNaN(e) || isNaN(f) || isNaN(g) || isNaN(h) || isNaN(i))
{
result = "请输入数字！";
document.getElementById("res_1").style.color = "red";
}else{
result = (2+8+1.4+0.8+1+0+x+p)*a+（1.2*d+0.7*e）+（70*g+500*h）+(b*3.5+c*2.1)+q;
/*(散装+墙改+档案+规划技术服务+气象+渣土费+x图纸审查+p配套)*a+白蚁+房产登记+房产交易费 +q人防 */
document.getElementById("res_1").style.color = "green";
}

document.getElementById("res_1").innerText = "总价："+result;
}


</script>
</head>
<body>
建筑工程在中心须交纳总价计算
<TABLE border="1" cellpadding="0" cellspacing="0">
<TR>
<TD>a总面积：</TD>
<TD><INPUT id="zmj_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD>b商用面积：</TD>
<TD><INPUT id="symj_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD>c住宅面积：</TD>
<TD><INPUT id="zzmj_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD>d七层以下面积：</TD>
<TD><INPUT id="down7_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD>e八层以上面积：</TD>
<TD><INPUT id="up8_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD>f基层面积积：</TD>
<TD><INPUT id="jcmj_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD>g住宅栋数：</TD>
<TD><INPUT id="zzds_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD>h商用栋数：</TD>
<TD><INPUT id="syds_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD>i层数：</TD>
<TD><INPUT id="cs_1" TYPE="text" VALUE="0"></TD>
</TR>
<TR>
<TD><input type="button" value="开始计算" onclick="result1()" /></TD>
<TD>
<span id="res_1"></span>
</TD>
</TR>
</TABLE>
<hr />
</body>
</html>
youfengjiang 2009-06-07
  • 打赏
  • 举报
 回复
谢谢
youngsheep 2009-06-07
  • 打赏
  • 举报
 回复
朋友，你这是Asp的基础

计算方式我看到头晕了，给一个方法吧



<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />

<title>无标题文档</title>

</head>



<body>





<%

'---这里是计算的代码

Dim A1 '总面积

Dim A2 '商用面积

'Dim ... .. .



A1 = Request("A1")	'取得输入的总面积

A2 = Request("A2")	'取得输入的商用面积



'----以下计算

Dim Cost1	'总金额

Cost1 = A1 * 100 + A2 * 50 '请自定义公式



Response.Write "计算结果："

Response.Write "<br>总面积为：" & A1

Response.Write "<br>商用面积：" & A2

Response.Write "<br>总金额为：" & Cost1

%>





<form method="POST" action="me.asp">

	

<p>请输入总面积<input type="text" name="A1" size="20">

<p>请输入商用面积<input type="text" name="A2" size="20">

<input type="submit" value="提交" name="B1">

<input type="reset" value="重置" name="B2"></p>

</form>



</body>

</html>
公式是怎样炼成的
公式是怎样炼成的 原文链接：http://www.youxihun.com/bbs/HTML/youxihungongshizenyanglianchengde.htm<br /> ... 8 属性计算公式 . 8 护甲减伤,闪避/招架强度转率公式 . 9 暴击/命
程序设计综合实践
早晨，去批发市场买牛奶。第i个牛奶卖主允许以所需价格购买任意数量的牛奶，每瓶牛奶的价格为si。（每个卖主的牛奶都一样） 傍晚，有m个出售牛奶的地方。...第一行包含三个整数n，m，r（1≤n≤30，1≤m≤30，1≤r≤...
油管公式（全）
每个人都应该有一个 YouTube 频道。...我不想成为宇航员或医生——我无法想象一个没有成为 YouTuber 的世界。我 2012 年开始我的频道，第一年只有 40 个订阅者。现在我拥有世界上增长最快的频道之一。
uniapp 仿网易云音乐播放器 微信小程序
uniapp 仿照网易云播放器,微信小程序
C语言程序设计详细教程， 从零基础到精通，收藏这篇就够了！
交换之后，拿新的第一个结点的数据域与下一个结点再次对比，如果比他小，再次交换，依次类推。但是作用于变量名时 extern关键字就不是可有可无的了，全局变量在外部使用声明时，extern关键词是必须的，如果变量无 ...
ASP

28,406

社区成员

356,946

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章