- 11


Sd =

Sd + d Sd = Sd + d

loop

return

 

rashs '

'

_ restore rach '

Sr := 0 Sr = 0

do

(, r) read stat$, r

= if st$ = then exit do

(, r) ? st$, r

Sr =

Sr + r Sr = Sr + r

loop

return

:

: Sd0

= 0 [k = 0] Sr0

= 0 [i = 0]

<_>

= <Sd>

: [k =(1...N)] [i =(1...M)]

<_> <k> <dk> <1> <r1>

= < Sr> Sdk

= Sd/k-l/+dk Sri

== Sri-1 + ri

{ S = Sd - Sr

= <S>

 

: .




- -  - -  - -