#include <mpi.h>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <signal.h>

#define MYTAG 1
int myid, j;
double startwtime = 0.0, endwtime;

int main(int argc, char *argv[]) {
	int rank, from, to;
	MPI_Status status;
	int fact = 0;
	int myid;
	MPI_Init(&argc, &argv);
	MPI_Comm_size(MPI_COMM_WORLD, &rank);
	MPI_Comm_rank(MPI_COMM_WORLD, &myid);

	if (myid == 0) { //для 0 процесса

		from = rank - 1; // от кого принимаем
		to = 1; // кому отдаем
		fact = fact + myid; //число увеличивающееся на 1 при передаче
		MPI_Send(&fact, 1, MPI_INT, to, 0, MPI_COMM_WORLD);//отправка
		MPI_Recv(&fact, 1, MPI_INT, from, 0, MPI_COMM_WORLD, &status);//прием
	}
	else{
		if (myid == rank - 1) { // для 1 процесса
			from = rank - 2;
			to = 0;
		MPI_Recv(&fact, 1, MPI_INT, from, 0, MPI_COMM_WORLD, &status);
		fact += myid;
		MPI_Send(&fact, 1, MPI_INT, to, 0, MPI_COMM_WORLD);


	} else { // для остальных
		from = myid - 1;
		to = myid + 1;
		MPI_Recv(&fact, 1, MPI_INT, from, 0, MPI_COMM_WORLD, &status);
		fact += myid;
		MPI_Send(&fact, 1, MPI_INT, to, 0, MPI_COMM_WORLD);
	}
	}
	if (myid == 0) // в 0 процессе выводим
		printf("fact = %d", fact);
	MPI_Finalize();
	return 0;
}