Буланкин В.Б / Kalayev_IA_rmvs

COLAMO

; % COLAMO % % -

)*+,. G &,

% , % % %

$

. ,- % %

% - # &.

: % #

& % %

% (;"+a). ; $ # %

, % &

% [86,123,141]. ; $

%

$ $ ,

/ % ;"+a [122,123].

+ & [30,67,120,121,139] / % %,

, , ,

, ;"+a

-%, % %

. 7 # , /

% % %/ % %/

& / / , #

& & %, / % % %

[28].

,$ -% % %

%- (;"t) [94]. ;

% % % % G,,h*, - -

/ %/ /& /

337

;"t / par, seq, /

[121].

G , / ;"t , / ,

- % & $

, $ % %

, ,

& % , & $

& # . G&

& $ -/ % % forkjoin [21], : [29], [139],

% [121]. $ # &

, & [6].

" % /& % / ;"t [94]

% % $ , % % % $%

# & . 7

% % $

&- - . 9 & % %

$ # . +$ % %$ &M )*+, %

, & & - &

& & .

: %

- $

. ` % ,

, . ,

. . &, %

$ % % % %.

` / $ % % %

% % &, % %

338

% $ [116]. Y, % G,,h* % -% / %

$ # #

% [31]. + SWARD % %/ %

- send receive , $ &M « » [122]. .

, , $/ ;"+a % - %.

+ % COLAMO / % %

. ) % / &M% %

# . 6 &

% % % % %

[115], - % %

/ % /: % $

[61]. : /

%. + % # %

/ :

% %, /

, %.

G % % COLAMO % % :

-% ;

-% ;

-% - . t %

% % % % " ". 7 %

- , % #

%, $ &

&,

% % % $

/ [61].

+ & % / &: CADR name;

339

P

END name;

,ADR, END - / %; name - % ;

P - .

G %, / : Name=f, Name - %

, % -

$% f, & . G &

goto lab, lab - , % ,

& - . + / %

% %, -% ,

$ %.

+% %. " % . +

& % % , $%

, % &

% $ .

+% %/ % & %

(MEMory), (COMmutation)

(REGister). # % , % % %

% % , , %/ %

% ( .6.4).

Var a,b,c,d,e,f,g : Array [10 : Stream] Mem; Cadr

For I := 1 to 5 do Begin

A[I] := B[I]”C[I] + F[I]; D[I] := B[I]”C[I] + E[I]”G[I] + G[I-1];

End; EndCadr;

. 6.4. E # #

340

6 ,

, % % % . +

% %

$ , $

%.

7 " % , $% %

% $ # ; %

/ ( .6.5).

Var a,b,c,d,e,f,g : Array [10 : Stream] Mem;

Var Z : Integer Com; Cadr

For I := 1 to 5 do

Begin Z := B[I]”C[I];

A[I] := Z+F[I]; D[I] := Z + (E[I]”G[I]) + G[I-1];

End;

EndCadr;

. 6.5. E # "

% , $% % %

, % / /&

( .6.6).

Var a,b,c,d,e,f,g : Array [10 : Stream] Mem;

Var Z : Integer Reg; Cadr

For I := 1 to 5 do Begin

Z := B[I]”C[I]; A[I] := Z+F[I];

D[I] := Z + (E[I]”G[I]) + G[I-1]; End;

EndCadr;

. 6.6. E #

341

7 $

% . 9 % ,

%/ % , $

, % – /

/, , , &

.

+ $ /

. + # % %

$ % :

CADR S1;

For I := 1 to 5 do Begin

M[I] := B[I] ” C[I]; End;

ENDCADR;

CADR S2;

For I := 1 to 5 do Begin

A[I] := M[I]+F[I];

D[I] := M[I] + (E[I]”G[I]) + G[I-1]; End;

ENDCADR.

" & % % & %

, - ,

, # (9"), / . 9 -/

- $ # )*+,.

+ %

,

%.

, ,

, & % /,

342

. 9 % %,

/ % # , & . + ,

X[i]=f(X[j])

# % $ & -&, ,

$ , %

% %, i & j, % -/

%.

" ,

% % %, % % %

%,

,

& - /. 9 / %

% $ . + $

/ % ,

& , , - ,

$/ - . + - / &$ & #. G&M%

% / DCL, &

/ :

VAR p1 a1, p2 a2,…, pn an;

pi - i- , %

/ , VAR - / %.

9 %/ % %. 9

%/ % &.

% %: & % % (%, %,

%), $ (% (REAL), %

343

(COMPL), % (CHAR), % (ADDR), % (LOGIC),

%/ % (CONTR), % (INTEGER).

% , % %

. + 9+* %/ %

. + )*+, -

%/ % , %

# %, % - % %

.

+& % % / %

(VECTOR) (STREAM). h $% &

% % IVTRAN [76]. " / / %

. " % %/ % , #

& & & . + % %/ %

, # & & & .

Y & % -%

& & . ,

, & . " / % # ,

% .

G % / :

FOR[j=i1] [TO i2] [STEP i3] [WHILE i4] BEGIN p END;

FOR, TO, STEP, WHILE - / %; j - % ;

i1 - ;

i2 - $ , %/ j; i3 - ;

i4 - $ , %

;

BEGIN, END - &, / ; ) - .

344

+ , % % , / %

/ %

% % #

% . . &,

% %

, / # . +- -/ /

% ,

% % . +- #

% %.

Y . 6.7 , / % -

/ -

, , &

.

. 6.7. H U 8 B 8 # 8

Y % & & % & # . + & & / :

A[l:k:s],

h - % ;

l - , %/ &; k - , %/ &; s - - &.

+ % %/ % . " /&

, , &

345

. " / &

/ , k - / . Y, A[i, 4:8] , % &

, % 4- 8- - 1.

+ & % / &: VAR A [p1, p2, ... , pn] S,

h - % ;

pi - i- ; S - .

, &$ & % % & &

, % &. : %

%/ &

%, %/ (/)

/ . : % %/

/ % (/ %) %,

/ . : % %/ &

% & % % %

%, - & #

%.

* & ,

. %/ &

, %.

% .

Y . 6.8 % %

% , &

.

6 % % &

# , % #

& / / %, %

- $ # .

346