Цитата:
|
Сообщение от orion_asm
при этом сам массив не изменяется,
|
Меняется массив во всех блоках, просто элементы не зависят друг от друга.
вот грубый пример:
Код:
function deystvie(a,b:real):real;
const n=1000; m=1200; k=189;
var i:integer; d:array[1..n+m+k] of real; c:real;
begin
{block 1}
for i:=1 to n do
d[i]:=exp(0.2*i)*36598/sin(pi*i)+a;
{block 2}
for i:=n+1 to n+m do
d[i]:=cos(pi*i)*exp(2*i)-b;
{block 3}
for i:=n+m+1 to n+m+k do
d[i]:=1987456*i-3243555*sqrt(i)*sqr(a*b);
c:=0;
for i:=1 to n+m+k do
c:=c+d[i]
Result:=c
end;
Цитата:
|
думаю, логично создать 3 отдельных процесса, каждый из которых будет выполнять свои действия независимо друг от друга.
|
Расскажите как сделать чтобы три процесса работали одновременно? Спасибо