回 帖 发 新 帖 刷新版面

主题:我是菜鸟,帮帮看看我编的这个程哪里错了?

我是新手,谁帮我编这个程——
输入梯形的上底、下底和高,求面积。
我编的是——
program ex1;
var a,b,h,s:real;
begin
readln(a,b,h);
s:=(a+b)*h/2;
writeln('s=',s)
end.
  

回复列表 (共7个回复)

沙发

快快帮我啊!~~~~~~~~~~

板凳

没什么错啊,是输出的问题吗?
writeln('s=',s:5)
冒号后面的数字你可以自己写

3 楼

能告诉我你运行的时候出现什么问题```这样好解决

4 楼

writeln('s=',s)
后面少了分号“;”[em17]

5 楼

终于解决了,原来
var a,b,h,s:real;中少输入s,难怪半天都不能成功……[em10]

6 楼

谢谢了,给位,不好意思啊!自己的疏忽麻烦了大家,真实抱歉啊!

7 楼

也是哦 这个我没认真看```刚刚我自己编了下 有加; 感觉都没错``哈哈

我来回复

您尚未登录,请登录后再回复。点此登录或注册