R6025 pure virtual function call

#include <iostream>
#include <cstring>
using namespace std;
 
class Animal { //Класс животные
    int men; //Колличество мужских особей.
    int women; //Колличество женских особей.
    char name[20]; //Название животного
public:
    Animal() { // Конструктор.
        men = women = 0;
        strcpy(name, "Неизвестно");
        cout << "Сработал конструктор базового класса № 1\n";
    }
 
    Animal(int m, int w, char *n) { //Конструктор.
        men = m;
        women = w;
        strcpy(name, n);
        cout << "Сработал конструктор базового класса № 2\n";
    }
 
    Animal(int x, char *n) { //Конструктор.
        men = women = x;
        strcpy(name, n);
        cout << "Сработал конструктор базового класса № 3\n";
    }
 
    int showDim() { //Функция 
        cout << "Колличество мужских особей -> " << men << "\nКолличество женских особей -> " << women << endl;
        return 0;
    }
 
    int getMen() { return men; } 
    int getWoman() { return women; }
    char *getName() { return name; }
 
    virtual int area() = 0 {
        cout << "Ошибка: area() должна быть переопределена. \n";
        return 0;
    }
 
    virtual ~Animal() {
        cout << "Сработал виртуальный деструктор\n";
    }
};
 
class Predator : virtual public Animal { //Класс хищники
    char style[20];
public:
    Predator(){}; //Конструктор по умолчанию
    Predator ( int m, int w, char *str )  : Animal (m,w, str ) {
        strcpy(style, str);
    }
 
    Predator (int x, char *str) : Animal(x, str) {
        strcpy(style, str);
    }
 
    int area() {
        return getMen() + getWoman();
    }
};
 
class Ancientsd : virtual public Animal { //Доисторические
    char style1[20];
public:
    Ancientsd() {}
    Ancientsd (int m, int w, char *str) : Animal (m,w, str) {
        strcpy(style1, str);
    }
 
    Ancientsd(int x) : Animal(x,"Неизвестен"){} //Пример ошибки виртуальной функции
 
    int area() {
        return getMen() + getWoman();
    }
};
 
class Dinosaurs : public Ancientsd, virtual public Predator {
    char name_din[20];
public:
    Dinosaurs (int m, int w, char *str) : Predator(m,w,str), Animal(m,w,str) {
        strcpy(name_din, str);  
    }
 
    int area() {
        return getMen() + getWoman();
    }
};
 
int main() {
    setlocale (LC_ALL, "Russian");
    Animal *shapes[5];
    shapes[0] = &Predator(8,12,"Волк");
    shapes[1] = &Ancientsd(10);
    shapes[2] = &Ancientsd(10,4,"Соблезуб");
    shapes[3] = &Predator(7,"Лиса");
    shapes[4] = &Dinosaurs(4,5,"Тиранозавр");
    cout << "\n\n\n";
    for(int i=0; i<5; i++) {
        cout << "Объект класса - " << shapes[i]->getName() << endl;
        cout << "Всего особей -> " << shapes[i]->area() << endl;
        cout << shapes[i]->showDim() << endl;
        cout << endl;
    }
    system("pause");
    return 0;
}