type
   planet = class
     private
       pnum: integer;
       pname: string;
     public
       constructor Create(pname: string; pnum: integer);
       begin
         writeln('===');
         writeln('Планета №', pnum);
         writeln('Введите название планеты');
         Readln(pname);
       end;
        
   end;

~~~~~~~~

begin
   p1:= new Planet('', 1);
   p2:= new Planet('', 2);
// etc...
end.

class Entity {
public:
      void render() {
          _graphic->render();
      }
        
protected:
      Graphic* _graphic;
};

class Graphic {
public:
      virtual void render() = 0;
};

class Image : public Graphic {
public:
      void render() {
          // Выводим графику
      }
};

class Sprite : public Entity {
      Sprite() {
          _graphic = new Image;
      }
};

int main()
{
      Entity* entity = new Sprite;
      entity->render();

      return 0;
}