/* C */#include<stdio.h>#include<mpi.h>intmain(intargc,char*argv[]){/* MPI Parameters */intrank,size,len;charname[MPI_MAX_PROCESSOR_NAME];/* All ranks initiate the message-passing environment. *//* Each rank obtains information about itself and its environment. */MPI_Init(&argc,&argv);/* start MPI */MPI_Comm_size(MPI_COMM_WORLD,&size);/* get number of ranks */MPI_Comm_rank(MPI_COMM_WORLD,&rank);/* get rank */MPI_Get_processor_name(name,&len);/* get run-host name */printf("Runhost:%s Rank:%d of %d ranks hello, world\n",name,rank,size);MPI_Finalize();/* terminate MPI */return0;}