如题所述
首先，梯形的面积是等于上底加下底的和乘以高再除以2，即：
梯形面积=（上底+下底）*高/2
则可以编程如下：
clear
input "输入梯形上底：" to a
input "输入梯形下底：" to b
input "输入梯形高：" to h
?"梯形面积为："，（a+b）*h/2
梯形面积=（上底+下底）*高/2
则可以编程如下：
clear
input "输入梯形上底：" to a
input "输入梯形下底：" to b
input "输入梯形高：" to h
?"梯形面积为："，（a+b）*h/2
温馨提示：答案为网友推荐，仅供参考
第1个回答 2010-11-01
主程序：
clear
set talk off
input "输入梯形上底长：" to a
input "输入梯形下底长：" to b
input "输入梯形高：" to h
?"输出梯形面积："，timian(a,b,h)
set talk on
return
*timian
function timian
para a,b,h
s=(a+b)*h/2
return s
clear
set talk off
input "输入梯形上底长：" to a
input "输入梯形下底长：" to b
input "输入梯形高：" to h
?"输出梯形面积："，timian(a,b,h)
set talk on
return
*timian
function timian
para a,b,h
s=(a+b)*h/2
return s
