Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <mpi.h>
- #include <stdio.h>
- #include <stdlib.h>
- #include <time.h>
- int main(int argc,char **argv)
- {
- MPI_Init ( &argc, &argv );
- int myid,i,tag;
- int randomDigits[10];
- int randomDigits_2[10];
- float randomDigits_3[10];
- MPI_Status status;
- srand(time(NULL));
- for ( i=0; i < 10; i++)
- {
- randomDigits[i] = rand() % 7; //0-6
- randomDigits_2[i] = 200 + rand() % 101;// 200-300
- randomDigits_3[i] = 0.01 * (rand() % 101); //0.01-1
- }
- tag=213;
- MPI_Comm_rank(MPI_COMM_WORLD,&myid);
- if (myid==0)
- {
- MPI_Send(&randomDigits,10,MPI_INT,1,tag,MPI_COMM_WORLD);
- printf("Process 0\n");
- for ( i = 0;i < 10; i++)
- printf("Massiv s 1 datchika[%d] = %d\n",i, randomDigits[i]);
- }
- if (myid==1)
- {
- MPI_Send(&randomDigits_2,10,MPI_INT,1,tag,MPI_COMM_WORLD);
- printf("Process 2\n");
- for ( i = 0;i < 10; i++)
- printf("Massiv s 2 datchika[%d] = %d\n",i, randomDigits_2[i]);
- }
- if (myid==2)
- {
- MPI_Send(&randomDigits_3,10,MPI_FLOAT,1,tag,MPI_COMM_WORLD);
- printf("Process 3\n");
- for ( i= 0;i < 10;i++)
- printf("Massiv s 3 datchika[%d] = %3.3f\n",i, randomDigits_3[i]);
- }
- printf("Process %d\n");
- MPI_Finalize();
- return 0;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement