mpiprog1.cpp

#include<stdio.h>
#include<string.h>
#include<mpi.h>
#define MASTER 0
#define MAX_STRING 100
int main(void)
{
	char greeting[MAX_STRING];
	int comm_sz;
	int my_rank;

	MPI_Init(NULL,NULL);//first initialisation in MPI routine
	MPI_Comm_size(MPI_COMM_WORLD,&comm_sz);//intialise size
	MPI_Comm_rank(MPI_COMM_WORLD,&my_rank);//provide a rank to task
	if(my_rank!=MASTER)
	{
		sprintf(greeting, "Welcome to the World of Parallel Computing. I am process no %d out of %d", my_rank, comm_sz);
		MPI_Send(greeting, strlen(greeting)+1,MPI_CHAR,0,0,MPI_COMM_WORLD);
	}
	else
	{
		printf("Welcome to the world of Prallel Computing. I am Process no %d out of %d", my_rank, comm_sz);
		for(int q=1; q<comm_sz; q++)
		{
			MPI_Recv(greeting, MAX_STRING, MPI_CHAR, q, 0, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
			printf("%s \n", greeting);
		}
	}

	MPI_Finalize();
	return 0;
}