纪英男微博 - 百度:PASCAL新手编程

来源：百度文库 编辑：神马品牌网 时间：2024/05/06 02:57:08
我是一个初1的.由于特殊原因要学PASCAL,现提出几个问题`帮编编:
1:输入3个数,计算并输出它们的平均值和3个数的乘积,写出程序.
2:以知地球半径是6371KM,计算并输出他们的表面积和面积.

var a,b,c:integer;
begin
readln(a,b,c);
writeln((a+b+c)/3:0:3,(a+b+c));
end.

var v,area,r:real;
begin
r:=6371;
area:=4*pi*r*r;
v:=4/3*pi*r*r*r;
writeln(area:0:2,v:0:2);
end.

PASCAL新手编程 编程PASCAL pascal编程 pascal编程： Pascal编程 Pascal编程 Pascal编程 Pascal编程 pascal编程 pascal编程