Pascal语言编程:某梯形的上底、下底和高分别为8,12,9,求该梯形的面积.下面是我自己写出来的,我新学的,帮我看下,有没有错,错在哪?var s:integer;beginwrite('s=');readln(s);s:=(8+12)*9/2;writeln{'s=',(8+12)*9/2};

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/16 04:47:37

Pascal语言编程:某梯形的上底、下底和高分别为8,12,9,求该梯形的面积.下面是我自己写出来的,我新学的,帮我看下,有没有错,错在哪?var s:integer;beginwrite('s=');readln(s);s:=(8+12)*9/2;writeln{'s=',(8+12)*9/2};
Pascal语言编程:某梯形的上底、下底和高分别为8,12,9,求该梯形的面积.
下面是我自己写出来的,我新学的,帮我看下,有没有错,错在哪?
var s:integer;
begin
write('s=');
readln(s);
s:=(8+12)*9/2;
writeln{'s=',(8+12)*9/2};
readln;
end.

Pascal语言编程:某梯形的上底、下底和高分别为8,12,9,求该梯形的面积.下面是我自己写出来的,我新学的,帮我看下,有没有错,错在哪?var s:integer;beginwrite('s=');readln(s);s:=(8+12)*9/2;writeln{'s=',(8+12)*9/2};
所有数据都知道了 那你s读的什么?刚读完就被覆盖了
直接打印就是了 一句解决writeln('s=',(8+12)*9 div 2);
或者writeln('s=',(8+12)*9/2:0:0);
不是整除的话要保留位数的(就是那个":0:0")