MPI зависает на Recv

int _tmain(int argc, char* argv [])
{
    int myrank, ranksize, i;
    MPI_Status status;
    MPI_Init(&argc, &argv);//Инициализация MPI
    //Определяем свой номер в группе:
    MPI_Comm_rank(MPI_COMM_WORLD, &myrank);
    //Определяем размер группы:
    MPI_Comm_size(MPI_COMM_WORLD, &ranksize);
    cout << ranksize << endl;
    long split;//Разделитель между двумя частями массива для слияния
    long ub;//Правая граница части массива для сортировки
    long size;//размер массива
    int* mass;
 
    if (!myrank)
    {//Это процесс-мастер
 
        cout << "BBeguTe PA3MEP\n";
        do {
            fflush(stdin); cin.clear();
            size = 0;
            cin >> size;
            if (size <= 0)
                cout << "HeBePHbIu BBog, noBTopu\n";
        } while (size <= 0);
 
    }
 
    mass = new int;
    delete mass;
    ranksize = 3;
 
    if (!myrank) {
        mass = new int[size];
        size = loadFromFile("input.txt", mass, size);
    }
 
    MPI_Bcast(&size, 1, MPI_LONG, 0, MPI_COMM_WORLD);
 
    if (myrank) {
        mass = new int[size];
    }
 
 
    //Определяем размер диапазона для каждого процесса:
    long step = size / ranksize;
 
    if (!myrank) {
        
        ub = step - 1;
 
        if (ranksize > 1) {
            //Рассылаем исходные данные подчиненным процессам:
            for (i = 1; i < ranksize - 1; i++)
            {
                cout << "master data_size = " << step << endl;
 
                MPI_Send(mass + i * step, step, MPI_INT, i, 98, MPI_COMM_WORLD);
 
                cout << "master sended " << i << endl;
            }
 
            cout << "master data_size = " << size - step * (ranksize - 1) << endl;
 
            MPI_Send(mass + i * step, size - step * (ranksize - 1), MPI_INT, ranksize - 1, 98, MPI_COMM_WORLD);
 
            cout << "master sended " << i << endl;
        }
 
        cout << "master sended all\n";
    }
    else
    {//Это один из подчиненных процессов
        long cursize;
        
        if (myrank == ranksize - 1) {
            cursize = size - step * (ranksize - 1);
        }
        else {
            cursize = step;
        }
 
        ub = cursize - 1;
 
        cout << "slave " << myrank << " size = " << size << " cursize = " << cursize << endl;
 
        //Получаем исходные данные:
        MPI_Recv(mass, cursize, MPI_INT, 0, 98, MPI_COMM_WORLD, &status);//Тут виснет
 
        cout << "slave " << myrank << " received\n";
    }
 
    cout << myrank << " sort\n";
 
..............................................