MPI并行程序设计之平行Rank

最新推荐文章于 2024-11-15 18:34:30 发布

原创最新推荐文章于 2024-11-15 18:34:30 发布 · 1k 阅读

0 ·

CC 4.0 BY-SA版权

MPI 专栏收录该内容

3 篇文章

订阅专栏

本文介绍了一个使用MPI实现的并行排序程序。该程序通过Scatter和Gather操作分配和收集数据，并在根节点上进行排序，展示了并行计算的基本原理。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

题目描述：
这里写图片描述

实验代码：

#include<stdio.h>
#include<stdlib.h>
#include<malloc.h>
#include<math.h>
#include"mpi.h"
struct parallel{
    int nnum;
    int rrank;
 };
int main(int argc, char** argv)
{
        int rank,size,*sbuf,rbuf[10],i;
    int* rrbuf;
    int num;
        MPI_Init(&argc,&argv);
        MPI_Comm_size(MPI_COMM_WORLD,&size);
        MPI_Comm_rank(MPI_COMM_WORLD,&rank);
        if(rank==0)
    {

       sbuf=(int*)malloc(sizeof(int)*size);
           rrbuf=(int*)malloc(sizeof(int)*2*size);
    for(i=0;i<size;i++)
      sbuf[i]=rand()%10;
        //struct parallel   pa[size];
    }
    MPI_Scatter(sbuf,1,MPI_INT,rbuf,1,MPI_INT,0,MPI_COMM_WORLD);    
    rbuf[1]=rank;
        MPI_Gather(rbuf,2,MPI_INT,rrbuf,2,MPI_INT,0,MPI_COMM_WORLD);
        if(rank==0)
        {
    struct parallel min;
    struct parallel pa[size];
    printf("Before the sort:\n");
    int j;
    int t;
    printf("The num is: ");
    for(i=0;i<2*size;i++)
    {
    if(i%2==0)
    printf("%d ",rrbuf[i]);
         }
    printf("\n");
    printf("The rank is ");
    for(i=0;i<2*size;i++)
    {
    if(i%2!=0)
    printf(" %d",rrbuf[i]);
      }
    printf("\n");

    for(i=0;i<2*size;i++)
    {
     j=i/2;
    if(i%2==0)
    {
      pa[j].nnum=rrbuf[i];
      pa[j].rrank=rrbuf[i+1];
    }
     }
     //---------------------sort----------------------------
    for(i=0;i<size-1;i++)
    {
       for(j=i+1;j<size;j++)
       {
          if(pa[i].nnum>pa[j].nnum)
            {
              min=pa[i];
          pa[i]=pa[j];
         pa[j]=min;
            }
       }
    }
    printf("After sort:\n");
    printf("The num is: ");
        for(i=0;i<size;i++)
           printf("%d ",pa[i].nnum);
    printf("\n");
    printf("The rank is: ");
    for(i=0;i<size;i++)
       printf("%d ",pa[i].rrank);
    printf("\n");
    }
//  printf("\n");
        MPI_Finalize();
        return 0;
}