Android- : play.google.com
->

0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 [42] 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78

. \ = 1; «/2=4; =5; 1/4=4; 1/5=3; =3,5; .7=3,5; i/e=3; 1/9= 1; 1/10=0,5; 1/11 = 0,2 1/12 = 0 Ci = 1,34 8572; =0,5484827557; = - 0,6166666667; 4 = - 0,1732050808; 05 = 0,04214761383; fco=2,391666667; 61 = 1,556655773; 62 = - 0,733333333; 63= -0,1666666667; 64= -0.01666666667; 65 = - 0,02667755999; =0,1083333333. , § 5.1 (, ,-, 6, ,), , - , .

- , , . , ti : / (ti-Q) , (<,+0) , . yi {ti-0)=yi (/,+0), (/,) . , . ,

h, I/, (-0)=0, 1/1 (fl-fO)=l, , 1/2 (<2-

- 0)=1 1/2 (<2-f 0) =0. i 1, {t) n. u .

[u-1, u] (t) ,

y(t)-yi~y t-ti\ yi-yi-i ti-ti-i

, , (t) -

(<, -]-0, ti-Q) :

(0 =

(<,-.-fO)-

i/(f,-0)-i/(f,-i-fO)

ti-ti-,

l/(<.-0)-!/(<<-+0)

. (5.11) (5.12), (x = nfkAt):

. 1

Y[y (.-1+0)+/ (<.-0)!.

- (ti-i+G) sin (2- (/-l))i-

- (fi-i+O)) sin (X (2i-l))l,

TnL (<.-i+0) cos (2x (i-1))-

-y (/,.-0) cos {2xi)\+ lyit,-0)-

-y (i-i+O)) cos (X (-1))1.

§ 5.1.

5.8.

10 PRIHT -

20 PRIHT , , 1=0

30 PRIHT

48 INPUT » =

58 1 N=HsliIM CKN),Yil/N)

68 FOR 1=1 TO N:PRINT!3.0! Tl-IMNPUT U<I>

70 <:-8>» V<T+8> V<8, I),V<bI>!NEXT I

98 F=F! IF F>8 GOTO 158

180 LET A=8: FOR 1=2 TO H

118 LET A=A+<g<I)-M<I-l))iii<V<lfI-l>+V<:8f 0><2>! I

120 PR INT !F 1.9! <;8>=AsLETS=T!«ABS<A>

138 PRIHT S<:8)=S! GOTO 98

158 LET A=8!LET 8=8:LET R=0!LET X8=#Pl!«Fi«T!F0R 1=2 TO N

168 LET 1=2#1<1-1>! LET 2=2#1<1)

178 LET =<<8,1>-<-1)>/<2-1>

175 LET D=F!«U<I-1)!IF D-INTCIlXl.E-S THEN LETX1=8

188 LET D=Fi«U<I>!. IF Ii-INT<D)<l.E-5 THEN LETX2=e

185 LETS1=SIN<X1>s LETS2=SIN<X2)s LETC1=C0S<X1> s LETC2=C0S<X2>

198 LET =+<<2-1)+<0.1)82-<1».1-1>*31)/0

288 LET =+<<32-31)-<8)2+1-1>1>/8

218 NEXT Is LET 6=<+>: IF G=8 GOTO 238

215 LET Z=A/-G! IF ABS<Z><1.E-11 THEN LET Z=8

228 LET R=-ACS<Z>! IF B<0 THEN LET R=-R

238 PRINT!F1.9! M<F)=G

240 PRINT 3<>=/2

258 PRINT a<F>=IiE8<R)!G0T0 98!ENIi



. 5.1 ( ) = 4-10- , N = 32. ti = Q, F(t-0}=0, F(t+Q) = l, t2=l-\Q- , F{t - G) = l, F{t + 0}=0. /=250000. G (0) =0.25. S (0) = 1 10- .G if) = = 0,4501581581, S (f) =9,003163162-10" (f) = -45° ( ). i 1, ( =f (), ( =G (f), S(f)S{F) ((£).

- fit,

5.9.

(f) = if) +% (/)", ( = = -arctg 5 (f)/c(f)]. (t)- fi (0. (0) (t) 1 = 0.

- (/) ,.

it)

(0

{t) , ~-</2, . - 2, . ,

18 1 28 PRINT - 38 PRINT

40 PRINT"

50 M=M!IiIM A<M>i.E<M>

60 INPUT F=F

78 FOR =0 M:LETA«)=0sLETB«)=0:NEXT

88 =2#1:1 =

90 LETZ=X*T/2: INPUT N=N

100 INPUT 0=0

118 INPUT F<T 0+0>=V0

120 FOR 1=1 N-lSPRINT !3.0!1

130 INPUT 1! INPUT F<T-0>i.F<T+0) VlrV2

148 LETV=V1-V0SFOR =1 !0=0!1=1

150 LETX2=V/<Xl-X0):LETD=Zi«K!LETS0=SIN<X0>

160 LETS1=SIN<X1)!LETC0=COS<X0>!LETC1=COS<X1>

170 <>=<) + <181-030+21-0>>/11

188 <)=<:>+<00-11+2«1-30>)/11!

190 LETA<:0)=A<0)+<Tl-T0>iii<V0-i-Vl>/2/T!LETV0=V2

200 LETT0=T1!NEXT IsLETE=0

210 PRINT <) .0.5<> 0<)

220 PRINT!3.0!0i !F1.5!A<8>; <8)

230 LETE=0:FOR =1 !8=<<><>+<)<>>

235 IF =1 THEN LETG1=G

240 LETE=E-bGi«G:LETe=0slF 0=8 THEN 260

250 LETQ=-ACS<A<K)/G>!IF B<K><0 THEN LETa=-a

260 PRINT !3.e!K; !F1.5!Gi /2; DEG<Q>!HEXT

265 PR INT =SaR<E-Gli«Gl Jz-Gl

270 PRINT: INPUT TX=U:LETV=A<0>:LETP=X!«U

280 FOR K=l TO M:LETF=W!SiK:LETV=V+A<K>iiiCOS<W>+B<K>*SIN<W>:NEXT

298 PRINT V<tX>=V:GOTO 270!END

, 5.1 5.2. 5.9 , . . ( t .

- () - () () (t) . :

(/) = (0) + (<) +Ms ().

"

Aq (<) =] fi (t) cos bit dt, 5 (<) =

=\a {t\,s\n(iitdt, (f = to/2n)

Aq (<) 5 (<) (. § 5.1), [9, 10]:

( =

sin ) V = nfM L ~ > (2 -1)),

As (f) =

=:. («,.-a,. Osin (/2/-1)). / i-

, = (<,) Aq (). As (<) . ) (f) (-



05 PRINT-

10 INPUT =

20 INPUT ft=X! LETM=M-l: DIM ft<M)

30 FOR 1=1 TO M! INPUT ft=V

40 LETfta.)=V-X! LETX=V

58 NEXT I! INPUT T=T

68 LETC=8! LETS=8

78 INPUT F=F

75 =<#1>

88 FOR 1=1 TO M

90 =<1>03<<21-1>)+

108 1£5=<31<:<2*1-1)>+5! I

118 LETC1=C*SIN<P>/P! LET31=Si«SIN<P>/P

128 PRINT.

138 PRINT !2.3! 3G!R<:C1"2+Sl"2>fDEG<-ATN<S/C))

148 GOTO 68! END

. ai = 0,05; 02 = 0,4; 03 = = 0,75; 04=1; 05=1,16; = 1,2; 07=l,16; 08=1,08; 09=1,02; Oi=l,0 ; = 0,1 /4 (2)=0,2367203833, (2)=

= -160,4352421°.

, X ( = cos -f , y = f (), :

{) =0 , y{x)=Sx :> ,

S - .

0 = arccos [(xo-Xn}/xf\.

<=/= (sin G -G cos 6)/ (I -cos G), "= I/ = (G - sin G cos G) / (1 - cos G),

2 sin feG cos 0 -fe cos feG sin G ""m fe (fe-l) (1-cosG)

5.11.

. , = = 10, Xo = F = 0 xo = = 0=0 G = Q = 90°, = =/10 = 0,3183098862, , = 1=0,5 2 = = 2 = 0,2122065908.-

§ 5.3.

N Xi ( ), .

fe-ro

fe = l, 2, 3 4 ( fe> 4 ).

-

(x-)=-J [-,-, ()]. 1=1

] (:)=0.

10 PRIHTPAC4ET 20 PRINT n

30 PRINT 40 IWUT If n=n 50 IF =0 GOTO 80 60 IF N=1 GOTO 125

78 PRINT sGOTO 15

80 I UT A=A

90 I UT F=F

188 INPUT X8=X

110 LETQ=ACS<<X-F>/A>

128 PRINT!F1.9! a=IG<G!>!GOTO 138 125 INPUTBBEAHTE e!=G!!leta=RAD<a) 138 0=<1)-5) >/<#1< l-COS<a) ) > 148 PRINT A8=V0

158 letvi=<:e-sin<e>s«cos<a>v<#pi*a~cos<:G!>>>

160 PRINT A1=V1

170 >2 = 180 1£=2<8<)05<)-08<)31<)) 190 LETV=V/<#PIi«Ki«<: <"2)-1 >< l-COSQ) » 200 PRINT!2.0! =!1.9!V!60T0 178SEND



0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 [42] 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78



0.008
.