fork download
  1. #include<stdio.h>
  2. #include<mpi.h>
  3. #define n 10
  4.  
  5.  
  6. int rank,size;
  7. int a[n];
  8. int i;
  9. int lsum,gsum;
  10. int lavg,gavg;
  11. MPI_Init(&argc,&argv);
  12. MPI_Comm_rank(&rank,MPI_COMM_WORLD);
  13. MPI_Comm_size(&size,MPI_COMM_WORLD);
  14. srand(rank);
  15. for(i=0;i<n;i++)
  16. {
  17. a[i]=rand()%10;
  18.  
  19. }
  20. for(i=0;i<n;i++)
  21. {
  22. lsum+=a[i];
  23.  
  24. }
  25. lavg=lsum/n;
  26. MPI_Reduce(&lsum,gsum,1,MPI_INT,MPI_SUM,0,MPI_COMM_WORLD);
  27. printf("sum %d",gsum);
  28. MPI_Finalize();
  29. return 0;
  30.  
  31.  
  32.  
  33.  
Success #stdin #stdout #stderr 0.25s 40700KB
stdin
Standard input is empty
stdout
Standard output is empty
stderr
Error: unexpected symbol in "        int rank"
Execution halted