MPI

#include <iostream>
#include <ctime>
#include <mpi.h>
#include <vector>
 
using namespace::std; 
int ProcNum; 
int ProcRank;
int color;
int i,n;
double a=0;
int main(int argc, char* argv[]) 
{   int k=0,rank;
    MPI_Comm comm1;
    vector<int>V;
    srand ((unsigned) time(0));
  MPI_Init(&argc, &argv);
  MPI_Status Status;
  MPI_Comm_size(MPI_COMM_WORLD, &ProcNum); 
  MPI_Comm_rank(MPI_COMM_WORLD, &ProcRank);
if(ProcRank==0)
{ 
    for(i=1;i<ProcNum;i++)
    {
        if((rand()%i)%2==0){n=1;k++;V.push_back(i);}
        else{n=0;}
        MPI_Send(&n,1,MPI_INT,i,0,MPI_COMM_WORLD);
    }
    
    MPI_Comm_size(comm1, &n);//здесь ему тоже не нравится чего то
    for(i=0;i<n;i++)
    {
        a=rand()%i+10;
        rank=V[i];
        MPI_Send(&a,1,MPI_DOUBLE,rank,0,comm1);
    }
}
else
{
    MPI_Recv(&n, 1, MPI_INT, 0, 0, MPI_COMM_WORLD, &Status);
    if(n==1)
    {
        MPI_Comm_split(MPI_COMM_WORLD, 1, ProcRank, &comm1);
    }
    else
    {
        MPI_Comm_split(MPI_COMM_WORLD, MPI_UNDEFINED, ProcRank, &comm1);
    }
    if(n==1)MPI_Recv(&a, 1, MPI_DOUBLE, 0, 0, MPI_COMM_WORLD, &Status);
    cout<<"rank "<<ProcRank<<" N="<<n<<" a="<<a<<endl;
}
           MPI_Comm_free( &comm1 );
        MPI_Finalize();
        return 0;
}