16-ma’ruza. Sodda parallel algoritmlar

do { 
printf("\nMatritsa oʻlchamlarini kiriting: "); 

---

scanf("%d", &Size); 
if (Size < ProcNum) { 
printf("Matritsaning oʻlchami jarayonlar sonidan oshib ketdi!\n "); 
} 
} 
while (Size < ProcNum); 
} 
MPI_Bcast(&Size, 1, MPI_INT, 0, MPI_COMM_WORLD); 
 
RestRows = Size; 
for (i=0; i
RestRows = RestRows-RestRows/(ProcNum-i); 
RowNum = RestRows/(ProcNum-ProcRank); 
 
pVector = new double [Size]; 
pResult = new double [Size]; 
pProcRows = new double [RowNum*Size]; 
pProcResult = new double [RowNum]; 
 
if (ProcRank == 0) { 
pMatrix = new double [Size*Size]; 
RandomDataInitialization(pMatrix, pVector, Size); 
} 
} 
 
3. DataDistribution funksiyasi.
U 
b
vektorini yuboradi va dastlabki 
A matritsasining qatorlarini hisoblash tizimining jarayonlari orasida 
taqsimlaydi. Shuni ta’kidlash kerakki, n matritsaning satrlari soni 
protsessorlar sonining p koʻpaytmasi boʻlmasa, jarayonlar uchun 
uzatiladigan ma’lumotlar miqdori boshqacha boʻlishi mumkin va 
xabarlarni uzatish uchun MPI kutubxonasidagi 
MPI_Scatterv
funksiyasidan foydalanish kerak.