Абстрактный класс и его наследники

[Bumble bee]

Здравствуйте, кто читает этот пост. У меня такой вопрос, пишу сейчас курсовой по ООП, но есть одна загвостка, при объявлении пременной типа класса, который наследуется от абстрактного, пишет ошибку: "использование объекта абстрактного типа *класс-наследник* недопустимо".

//Абстрактный класс
class Body
{
protected:
	double radius, length, width, height;

public:
	Body(double, double, double, double);
	Body(double, double, double);
	Body(double, double);
	Body(double);

	virtual ~Body()
	{
		#ifdef _DEBUG
			cout << "~Currency()" << endl;
		#endif
	}

	virtual void Set() = 0;
	virtual void Show() = 0;
	virtual double GetArea() = 0;
	virtual double GetVol() = 0;
};


class Ball: public Body
{
public:
	Ball(double r):Body(r)
	{
		#ifdef _DEBUG
			cout << "Ball()" << endl;
		#endif
	}

	~Ball()
	{
		#ifdef _DEBUG
			cout << "~Ball()" << endl;
		#endif
	}

	void Set(double &);
	void Show(double &, double &);
	double GetArea();
	double GetVol();
};

//Кусок из основного сппшника 
				cout<<"Введите радиус шара:";
				cin>>radius;
				//inputData(radius, length, width, height);
				Ball ball/*Тут ошибка, ball определяется объектом абстрактного класса*/(radius);
				p = &ball;
				break;

[p51x]

	virtual void Set() = 0;
	virtual void Show() = 0;

Вы не переопределили эти абстрактные методы = ваш наследник тоже абстрактный класс.