// C++#include<iostream>#include<mpi.h>usingnamespacestd;intmain(intargc,char*argv[]){// MPI Parametersintrank,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 MPIMPI_Comm_size(MPI_COMM_WORLD,&size);// get number of ranksMPI_Comm_rank(MPI_COMM_WORLD,&rank);// get rankMPI_Get_processor_name(name,&len);// get run-host namecout<<"Runhost:"<<name<<" Rank:"<<rank<<" of "<<size<<" ranks hello, world"<<endl;MPI_Finalize();// terminate MPIreturn0;}