C++ :

#include<iostream>
#include<cmath>
#include<iomanip> 
using namespace std;
const float PI = atan(1)*4;
const float FENCE_PRICE=35;//栅栏单价 
const float AISLE_PRICE=20;//过道单价 
class Circle{
public:
		Circle(float r);//构造函数 
		float perimeter();//计算圆的周长 
		float area();//计算圆的面积 
private:
		float radius;//圆的半径 
};
//构造函数初始化数据成员radius 
Circle::Circle(float r){
	radius=r;
}
//计算圆的周长 
float Circle::perimeter(){
	return 2*PI*radius;
}
//计算圆的面积 
float Circle::area(){
	return PI*radius*radius;
}
int main() 
{ 
	float radius;
	cin>>radius;
	Circle pool(radius);//游泳池边界对象
	Circle fence(radius+3);//栅栏对象
	//计算过道造价并输出
	float aisleCost=(fence.area()-pool.area())*AISLE_PRICE;
	cout<<fixed<<setprecision(1);
	cout<<aisleCost<<endl;
	//计算栅栏造价并输出
	float fenceCost=(fence.perimeter()*FENCE_PRICE);
	cout<<fenceCost<<endl; 
    return 0; 
}

Pascal :

program p27050;
const
 pi=3.14159;
var
 r,dr,sl,gd:real;
begin
 readln(r);
 dr:=r+3;
 sl:=2*pi*dr*35;
 gd:=(pi*dr*dr-pi*r*r)*20;
 writeln(gd:0:1);
 writeln(sl:0:1);
end.