Стр. 103 - Параллельное программирование

ПАРАЛЛЕЛЬНОЕ ПРОГРАММИРОВАНИЕ
101
if(numsent<arows)
{
MPI_Send((Asend+numsent*acols), acols,
MPI_INT,
sender, numsent, MPI_COMM_WORLD);
numsent++;
}
else
{
// посылка признака конца работы
int endstr = 0;
MPI_Send(&endstr, 1, MPI_INT,
sender, 200, MPI_COMM_WORLD);
}
}
// распечатка матрицы A
printf("\n Matrix A = \n");
for(i=0;i<crows;i++)
{
for(j=0;j<ccols;j++)
{
printf("%i ",A[i][j]);
}
printf("\n");
}
// распечатка матрицы B
printf("\n Matrix B = \n");
for(i=0;i<crows;i++)
{
for(j=0;j<ccols;j++)
{
printf("%i ",B[i][j]);
}
printf("\n");
}
// распечатка матрицы С
printf("\n Matrix C = \n");
for(i=0;i<crows;i++)
{
for(j=0;j<ccols;j++)
{
printf("%i ",C[i][j]);
}
printf("\n");
}
stream = fopen(fileC, &mode_w);
for(i=0;i<crows;i++)
{
for(j=0;j<ccols;j++)
{