... 9 , 2010 MPI/OpenMP 60 1 2 3 ( PARALLEL) #pragma omp parallel [ [ [, ] ] ...] : default(shared | ... include stdio.h int main () { int n =100000, i; double pi, h, sum , x; h = 1.0 / ( double ) n; sum = 0.0; for (i = 1; i = n; i ++) { x = h * (( double )i - 0.5); sum += (4.0 / (1.0 + x*x)); } pi = h * sum ; printf( pi is approximately %.16f , pi); return 0; } 9 , 2010 MPI / OpenMP 84 1 2 3 OpenMP int main () { int n =100, i; double pi, h, sum , x; h = 1.0 / ( double ) n; ...

243. http://ocean.phys.msu.ru/courses/geo/lectures-addons/02/2006%20Wood%20et%20al.%2C%20Accretion%20of%20the%20Earth%20and%20segregation%20of%20its%20core.pdf