并行程序设计实验.docxVIP

并行程序设计实验1数据接力传送#include mpi.h#include stdio.hint main(int argc,char ** argv ){ int rank, value, size;MPI_Status status; MPI_Init( argc, argv ); MPI_Comm_rank( MPI_COMM_WORLD, rank ); MPI_Comm_size( MPI_COMM_WORLD, size ); /* 得到当前进程标识和总的进程个数*/ /* 循环执行 直到输入的数据为负时才退出*/ if (rank == 0) { fprintf(stderr, \nPlease give new value=\n); /*进程0读入要传递的数据*/ scanf( %d, value ); fprintf(stderr,%d read -- (%d)\n,rank,value); if (size1) { MPI_Send( value, 1, MPI_INT, rank + 1, 0, MPI_COMM_WORLD ); fprintf(stder