安徽财经大学宿舍图片:关于一个编程问题
来源:百度文库 编辑:杭州交通信息网 时间:2024/06/05 14:32:42
我编的程序错在哪里?
问题是:已知图圆柱体的高为12,底面圆的半径为7,求圆柱体表面积。
以下是我编的程序:
Program ex7;
const h=12;
r=7;
var s:real;
begin
realn(h,r);
s:=pi*2*r*h+pi*r*r*2;
writeln(s);
end.
我错在哪里了?
问题是:已知图圆柱体的高为12,底面圆的半径为7,求圆柱体表面积。
以下是我编的程序:
Program ex7;
const h=12;
r=7;
var s:real;
begin
realn(h,r);
s:=pi*2*r*h+pi*r*r*2;
writeln(s);
end.
我错在哪里了?
pi变量未声明。
在const里面加上
pi=3.1415926;
(学Pascal呢,是吧?我8岁的时候就学完了)
应该是:
(1)readln拼错了有d
(2)h和r被定义成常数,再用readln读值是错误的
另:
pi是pascal中已有的函数,不用在Const定义
=====>
Program ex7;
const h=12;
r=7;
var s:real;
begin
s:=pi*2*r*h+pi*r*r*2;
writeln(s);
end.