Parallel dasturlash

// Jarayonlar oʻrtasida dastlabki ma’lumotlarni taqsimlash funktsiyasi
void DataDistribution(double* pMatrix, double* pProcRows,
double* pVector, int Size, int RowNum) {
int *pSendNum; // Jarayonga yuborilgan elementlar soni
int *pSendInd; // Jarayonga yuborilgan
//birinchi ma’lumotlar elementining indeksi
int RestRows=Size; // Hali ajratilmagan matritsa qatorlari soni


MPI_Bcast(pVector, Size, MPI_DOUBLE, 0, MPI_COMM_WORLD);
// Vaqtinchalik ob’ektlarni saqlash uchun xotira ajratish
pSendInd = new int [ProcNum];
pSendNum = new int [ProcNum];
// Har bir jarayon uchun moʻljallangan matritsa qatorlarining oʻrnini aniqlang
RowNum = (Size/ProcNum);
pSendNum[0] = RowNum*Size;
pSendInd[0] = 0;
for (int i=1; i

RestRows -= RowNum;
RowNum = RestRows/(ProcNum-i);
pSendNum[i] = RowNum*Size;
pSendInd[i] = pSendInd[i-1]+pSendNum[i-1];
}
// Matritsa qatorlarini yuborish
MPI_Scatterv(pMatrix, pSendNum, pSendInd, MPI_DOUBLE, pProcRows,
pSendNum[ProcRank], MPI_DOUBLE, 0, MPI_COMM_WORLD);


//Xotirani boʻshatish
delete [] pSendNum;
delete [] pSendInd;
}
Shuni ta’kidlash kerakki, boshlangʻich ma’lumotlarni yaratish va ularni jarayonlar oʻrtasida joʻnatish harakatlarini bunday ajratish katta hajmdagi ma’lumotlar bilan haqiqiy parallel hisoblashda asossiz boʻlishi mumkin. Bunday hollarda keng qoʻllaniladigan yondashuv jarayon ma’lumotlari yaratilgandan soʻng darhol jarayonlarga xabarlarni uzatishni tashkil qilishdir. Ma’lumotlarni saqlash uchun xotira xarajatlarini kamaytirishga oxirgi jarayonda ma’lumotlarni ishlab chiqarishni tashkil etish orqali ham erishish mumkin (bu yondashuv bilan uzatilgan ma’lumotlar va jarayon ma’lumotlari uchun xotira bir xil boʻlishi mumkin).