{VERSION 6 0 "IBM INTEL NT" "6.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 1 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 
0 0 1 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 1 }
{CSTYLE "" -1 256 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
257 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 258 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 259 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 260 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 261 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
262 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 263 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 264 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 265 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 266 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
267 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 268 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 269 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 270 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 271 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
272 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 273 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 274 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 275 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 276 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
277 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 278 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 279 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 280 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 281 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
282 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 283 "" 0 1 0 0 
0 0 1 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 284 "" 0 1 0 0 0 0 0 1 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 285 "" 0 1 0 0 0 0 0 2 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 286 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
287 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 288 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 289 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 290 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 291 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
292 "" 1 12 0 0 0 0 0 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 293 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 294 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 295 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 296 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
297 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 298 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 299 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 300 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 301 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
302 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 303 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 304 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 305 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 306 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
307 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 308 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 309 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 310 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 311 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
312 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 313 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 314 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 315 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 316 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
317 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 318 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 319 "" 1 14 0 0 0 0 0 0 0 0 0 
0 0 0 0 0 }{CSTYLE "" -1 321 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 322 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
323 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 324 "" 0 1 0 0 
0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 325 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 326 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 327 "" 1 14 0 0 0 0 0 2 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
328 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 329 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 330 "" 0 1 0 0 0 0 0 1 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 331 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 332 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
333 "" 0 1 0 0 0 0 1 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 334 "" 0 1 0 0 
0 0 1 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 335 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 336 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 337 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
338 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 339 "" 0 1 0 0 
0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 340 "" 0 1 0 0 0 0 1 0 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 341 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 342 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
343 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 344 "" 0 1 0 0 
0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 345 "" 0 1 0 0 0 0 0 1 0 0 0 0 
0 0 0 0 }{CSTYLE "" -1 346 "" 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 }
{CSTYLE "" -1 347 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{CSTYLE "" -1 
348 "" 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 }{PSTYLE "Normal" -1 0 1 
{CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 
0 1 0 1 0 2 2 0 1 }{PSTYLE "Heading 1" -1 3 1 {CSTYLE "" -1 -1 "Times
" 1 18 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 0 0 8 4 1 0 1 0 2 2 0 1 }
{PSTYLE "Warning" -1 7 1 {CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 2 
2 2 2 2 1 1 1 3 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Error" 7 8 1 
{CSTYLE "" -1 -1 "" 0 1 255 0 255 1 0 0 0 0 0 0 0 0 0 0 }0 0 0 -1 -1 
-1 0 0 0 0 0 0 -1 0 }{PSTYLE "Maple Output" -1 11 1 {CSTYLE "" -1 -1 "
Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }3 3 0 0 0 0 1 0 1 0 2 2 0 1 }
{PSTYLE "Maple Output" -1 12 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 
2 2 2 2 2 2 1 1 1 1 }1 3 0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Normal" -1 
256 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 2 1 2 2 2 2 1 1 1 1 }1 1 
0 0 0 0 1 0 1 0 2 2 0 1 }{PSTYLE "Heading 1" -1 257 1 {CSTYLE "" -1 
-1 "Times" 1 12 0 0 0 1 2 2 2 2 2 2 1 1 1 1 }1 1 0 0 8 4 1 0 1 0 2 2 
0 1 }{PSTYLE "Normal" -1 258 1 {CSTYLE "" -1 -1 "Times" 1 12 0 0 0 1 
2 2 2 2 2 2 1 1 1 1 }1 1 0 0 0 0 1 0 1 0 2 2 0 1 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 64 "\324\340\351\353: .\312
\356\354\357\322\345\365\355\356\353\\\312\361\345\355\356\364\356\355
\362\356\342\\\321\356\342\354\321\362\340\362\374\350\\\324\340\351
\353\373\312_\316\357\362\317\356\324\353\356\362\316\367\302\356\344
\373\\" }}{PARA 0 "" 0 "" {TEXT -1 57 "3.2.6. \320\345\370\321\304\323
 \341\345\347\312\360\312\356\360\302^-1\321\363\371 2.mws. \322\350
\362\356\342 \312.\302. 02.03.17." }}}{EXCHG {PARA 0 "" 0 "" {TEXT 
311 58 "6. \317\360\350\342\345\344\345\355\350\345 \361\350\361\362
\345\354\373 \344\350\364\364\345\360\345\355\366\350\340\353\374\355
\373\365 \363\360\340\342\355\345\355\350\351 \352 \356\344\355\356
\354\363 " }}{PARA 256 "" 0 "" {TEXT -1 42 "\344\350\364\364\345\360
\345\355\366\350\340\353\374\355\356\354\363 \363\360\340\342\355\345
\355\350\376 \350 \345\343\356 \360\345\370\345\355\350\345." }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 19 "B^(-1)  \361\363\371\345\361\362
\342\363\345\362." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "restar
t;with(linalg):" }}{PARA 7 "" 1 "" {TEXT -1 80 "Warning, the protected
 names norm and trace have been redefined and unprotected\n" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 5 "\304\340\355\356:" }}}{EXCHG {PARA 
0 "" 0 "" {TEXT -1 20 "\307\340\344\340\344\350\354 \357\356\360\377
\344\356\352 \321\304\323 " }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
6 "n:=3: " }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 26 "\350 \354\340\362
\360\350\366\363 \345\270 \352\356\375\364\364\350\366\350\345\355\362
\356\342" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 55 "A:=matrix(n,n,[
seq(seq(a[i,j],j=1..n),i=1..n)]):A[1,2];" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#&%\"aG6$\"\"\"\"\"#" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 80 "\307
\340\357\350\370\345\354 \365\340\360\340\352\362\345\360\350\361\362
\350\367\345\361\352\363\376 \354\340\362\360\350\366\363 \350 \344
\345\362\345\360\354\350\355\340\355\362 (\365\340\360\340\352\362\345
\360\350\361\362\350\367\345\361\352\356\345 \363\360\340\342\355\345
\355\350\345)." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "M:=charma
t(A,k): det(M):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 73 "\315\356\354
\345\360 \361\362\360\356\352\350 \354\340\362\360\350\366\373, \361
\356\342\357\340\344\340\376\371\350\351 \361 \355\356\354\345\360\356
\354 \350\361\352\356\354\356\351 \364\363\355\352\366\350\350 \360
\345\370\345\355\350\377 \321\304\323, " }}{PARA 0 "" 0 "" {TEXT -1 
23 "\341\363\344\345\354 \356\341\356\347\355\340\367\340\362\374 \367
\345\360\345\347 " }{TEXT 265 2 "s " }{TEXT -1 53 "\350 \364\350\352
\361\350\360\356\342\340\362\374 \345\343\356 \352\356\355\352\360\345
\362\355\356\345 \347\355\340\367\345\355\350\345 \342 \350\355\362
\345\360\340\352\362\350\342\355\356\354" }}{PARA 0 "" 0 "" {TEXT -1 
6 "\360\345\346\350\354\345" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
5 "s:=1:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 346 10 "\317\360\350\354\345
\367\340\355\350\345" }{TEXT -1 2 ". " }{TEXT 347 66 "\317\360\350 \+
\360\340\347\355\373\365 \347\355\340\367\345\355\350\377\365 s \354
\340\362\360\350\366\340 B^(-1) \354\356\346\345\362 \361\363\371\345
\361\362\342\356\342\340\362\374 \350\353\350 \355\345\362. " }}{PARA 
256 "" 0 "" {TEXT -1 52 "\317\356\375\362\356\354\363 \363\361\353\356
\342\350\345 B^(-1)<>0 \355\340\344\356 \342\361\377\352\350\351 \360
\340\347 \357\360\356\342\345\360\377\362\374!" }}}{EXCHG {PARA 0 "" 
0 "" {TEXT -1 50 "\302\342\345\344\345\354 \354\340\362\360\350\366
\363, \352\356\354\357\356\355\345\355\362\373 \352\356\362\356\360
\356\351 \341\363\344\345\354 \342\373\367\350\361\353\377\362\374" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "B:=matrix(n,n,[]): " }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 22 "\317\360\356\361\354\356\362\360 \+
\361\362\360\356\352 \354\340\362\360\350\366 " }{TEXT 278 1 "\300" }
{TEXT -1 3 " \350 " }{TEXT 279 1 "\302" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 30 "row(B,1):=row(A,s): row(B,1); " }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#K%'vectorG6#7%&%\"aG6$\"\"\"F*&F(6$F*\"\"#&F(6$F*\"\"$Q
(pprint06\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 59 "\317\360\350\342
\356\344\350\354\373\345 \347\344\345\361\374 \364\356\360\354\363\353
\373 \356\361\362\340\376\362\361\377 \361\357\360\340\342\345\344\353
\350\342\373\354\350 \344\353\377 \353\376\341\356\343\356 " }{TEXT 
283 2 "n." }{TEXT 284 0 "" }{TEXT 285 16 " \302\356\362 \375\362\350 \+
\364\356\360\354\363\353\373" }}{PARA 0 "" 0 "" {TEXT -1 91 "row(B,j):
=evalm(row(B,j-1)&*A),    row(B,j):=evalm(row(A,s)&*A^(j-1)),  j=1...n
,   s=1...n," }}{PARA 0 "" 0 "" {TEXT -1 82 "\375\352\342\350\342\340
\353\345\355\362\355\373\345 \344\360\363\343 \344\360\363\343\363. \+
\312\340\352\363\376 \350\347 \355\350\365 \341\360\340\362\374 - \355
\345 \350\354\345\345\362 \356\361\356\341\356\343\356 \347\355\340
\367\345\355\350\377. \314\340\362\360\350\366\340 " }{TEXT 286 1 "
\302" }{TEXT -1 2 "  " }}{PARA 0 "" 0 "" {TEXT -1 66 "\355\340\354 \+
\357\356\355\340\344\356\341\350\362\361\377 \355\350\346\345, \352
\356\343\344\340 \341\363\344\345\354 \361\342\356\344\350\362\374 \+
\321\304\323  \352 \356\344\355\356\354\363 \363\360\340\342\355\345
\355\350\376." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 28 "\302\373\367\350
\361\353\350\354 \352\356\354\357\356\355\345\355\362\373 \354\340\362
\360\350\366\373 " }{TEXT 268 1 "\302" }{TEXT -1 1 ":" }}{PARA 0 "" 0 
"" {TEXT -1 35 "\340) \342\355\340\367\340\353\345 \342\373\367\350
\361\353\350\354 \361\362\360\356\352\350 \354\340\362\360\350\366\373
 " }{TEXT 277 2 "\302 " }{TEXT -1 35 "\357\356 \356\344\355\356\351 \+
\350\347 \342\373\370\345 \357\360\350\342\345\344\345\355\355\373\365
 \364\356\360\354\363\353" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
20 "for j from 2 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "row(B,j
):=evalm(row(A,s)&*A^(j-1))" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" 
}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 24 "\341) \340 \357\356\362\356\354
 \345\270 \352\356\354\357\356\355\345\355\362\373" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 20 "for i from 1 to n do" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 20 "for j from 1 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 
0 19 "B[i,j]:=row(B,i)[j]" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "od:od:
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "eval(B): row(B^(-1),1):
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 14 "row(B^(-1),2):" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 27 "\307\340\344\340\344\350\354 \342
\345\352\362\356\360 \360\345\370\345\355\350\377 \321\304\323:" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "X:=vector(n,[seq(x[i],i=1..n
)]); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"XGK%'vectorG6#7%&%\"xG6#
\"\"\"&F*6#\"\"#&F*6#\"\"$Q(pprint16\"" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 17 "\350 \342\342\345\344\345\354 \354\340\362\360\350\366
\363 " }{TEXT 263 1 "Z" }{TEXT -1 32 " \357\360\356\350\347\342\356
\344\355\373\365 \356\362 \342\345\352\362\356\360\340 \360\345\370
\345\355\350\351 " }{TEXT 260 1 "X" }{TEXT -1 1 " " }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 19 "Z:=matrix(n,n,[]): " }}}{EXCHG {PARA 0 "" 
0 "" {TEXT -1 11 "\302 \354\340\362\360\350\366\363  " }{TEXT 261 1 "Z
" }{TEXT -1 34 " \341\363\344\345\354 \347\340\357\350\361\373\342\340
\362\374 \357\360\356\350\347\342\356\344\355\373\345 \344\356  " }
{TEXT 262 1 "n" }{TEXT -1 33 "-\343\356 \357\356\360\377\344\352\340 \+
\342\352\353\376\367\350\362\345\353\374\355\356, \362\356 \345\361
\362\374" }}{PARA 0 "" 0 "" {TEXT -1 32 "                             \+
   " }{OLE 1 5161 1 "[xm]Br=WfoRrB:::wk;nyyI;G:;:j::>:B>N:F:nyyyyy]::y
yyyyy:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::::::fyyyyya:nYf::G:I:K:wAyA:::::::::::::::::::::::::::::::::::::::::
:::::::::::::::::::::::::::::::::::::JcvGYMt>^:fBWMtNHm=;:::::::n<Ejyy
iy=C:Abm?Z:>:;`:Z@[::JJYKimJlHScAj;JZa:<:=ja^GE=;:::::::::N;?R:yyyyyyA
:yayA:<::::::JDJ:j\\FHemj^HMmqnG;KaFFJufF>::::::;K;vyyuy:>:<::::::=J:F
q;Z:j:VBYmp>HYLkNG>::::::::N<?:xI:;Z::::::j<>:MM:>:nyyM;B:AB:;J<JAJ=Jy
K>j>J?>:Q:SJ:f;;jBjA>:[B:<JyKC>:a:c:e:gJ:v<<JFjFJGjGJHjHJIjIJJB:=C:N>V
>^>f>n>nYvY:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
=Z<Z:::>[n^;UkV>A=lUf?[KRFB=LR>@akU^@mkTFAu=s:?jFAvHA:CGt_:;J@WSsEt_j<
@Z?NZ>WdG_doB:arOMeU=DUSeJ=uVMuRAtUCUS[TRIUSamBPJd`ppPps<LaPpu<Lcxpp@P
qF\\=Vdsgg\\wgfS>ErJYUW_UTEeV;cMEM:@K<pNd<l\\\\QtDqjN<KRBYSKYFKYSJ[Dw[
r=ItQ=DN_yAwRJ[Dwer==D:cYKcYCcy]?tQ=\\JrJyTJvk?_xdveB_xIHb:B><NtyrZxQ^
LYBxjZdliLniPNtyo\\RJYB==j:FZ<NZ<NZ:N:=R:=j;F:CZDFZ:N:AfPHZUj?@Z<jpN:?
FEDZ=Hg:R:=B:Ob:=Jyyy;d:yayYZHQ:>:;`:Z@o<;j`@Pt\\Pd`QrPPJPMQ<MJPnrPqjL
qnxPq^;<:Z_SKGlAj\\@AJQLncp^nBwmcf]]:>::::::yayYZ:B:CZ:FZ:>:yayQ:>:VoN
B:SF;ny@j:F;HjyH:CJgC:;j<B:?R:?ja^G>D_mlVH[C:[C:>Z::::::::kJ;@j:>:?B:;
jysy;Z::::::j=JZX:<:=ja:;B:;:::::::::N[:jysy:>:<::::::wyyyA<::::::::::
::jysy:>:<:::::::::::::::::::vYxI:;Z::::::::j:>:E:=b:yyyyq<JQ@jFB:E:Qb
:B:E:Sb:;C;;h>aB:n^@v;sjyyiyAZ:nC[J:<JZyIQwyyyy;f><j_I:QB:<JMJ@fc[;>:;
H:KB:Ny<jC<J:<J:b:CZ:f_;j<B:cb:;d:IB;EB:;jCDJZDJuUj<j>DZ:>Z<f:^<Ar:gX:
sZ:Vy<N^yM:<:[V:>Z:b:;B>cTTUUSZZ:WE:kTfayW=UfayW;CJeyWsd<GUuC:Uk:F;;JS
d:<j:<:SSXsW:E:cJJ__A^=;jw?jx]:JBA:<Z<::<<nGVX==;;:f??J<>:[Y:=jFJSZ:^[
:JP<lRtLQtLP<lRJE?t<>r:>F;MD@JEo_<>R>F;r:EB:Cb[ukXHZEj:N:AFSHJ:l[:V[;F
Z;b:fG;J?DJ:HRv<j;V=hZ:Zck:@Z:N[;:CM;BWHZV:=Z<jpJ:N[<bZB:=FBDZ=L;LJ=q]
wN:KVF;Z<p??B::j;u`<bZS;=>HrnNZ>::DRQ::VjhC:;B:=Z:R:<JDDJyO\\?^=;B:qQK
Z:JBG:<J:DZJ:a=:W=ayW==;kt;jPF:C:[Q;<j>>Z:N@B:=B:;jp`QXA:^<Ub:oe;s:qAB
:>l;J:>Z<:::W=aqjJJ::UK;^:>X=j>>:_;<j:jn`QXA:^<AJO@JHjw;<:[V:>:;b:::Jq
jsGF>>:jPF:C:[Q;N;N@B:?J:fgcwVsW:E:cJJHJ\\QJHjw;<:[>;J:DZJ::JqjsYqjJJ:
:UK;^:>X=j>>:_;<j:jp^QJDNo;v]>^=;jw?JB:>l;J:>Z<:::W=aqjJJ::Uk:^:>X?J?J
SZ:N:;Jl\\qWAZ=fZ:>:cJJ?Bs:qAB:>L>:;b:<;VH:nGVX==;;:f??J<JrG:YJ:N@B:E:
oTUWUTWMkYJ\\LJUAJKIZ=fZ:JD^s=vh>^=VYB:<:[>;J:D:js:JqjsGF>>:jPF:C:[Y:?
J?JSZ:N:;JlLQZ?Z=B:^<;odEJHjw;<:[N:R:DZJVdscRYEUVdDN[;@hUQ<kTfFF>>:jPN
:C:[q:^[:B:_c<B:AB:;B:uSIuScqg;kT;HJg=:G;MW:ULt^DPpdPoHAj<@:ZoB:arOBUZ
];:^DPps:JqF<fg\\wG@[=;bM>:j\\jjN<KjQ:LYBvB<OsSJLyDB:P>:<[=we;kAQ^dZID
:<[:_X=tYKLBxjZ:xo\\RJZ:FZ<N:?B:F:=j;<j:^:dZ:N:AfPr@J:D:UM;<J;m<;rZME:
;R:=B:Ob:Cb[fa=:=B:?Z^s:;BAV;=Z<jp>:Ob:;rZkE:V=hZ:Zc[;B:OR:JlN:LAl;F:D
:U=;J?DZ<<=^<rZNZ>ZwN:Z<p?::AfUDZ<`?FJrZMM;::DRQ::VjhC:<j?<Z:n>^;yayI:
<J:J>JwC:<:J<B:Uk:^=<jw?<I:;JXEZ:Bm=b:?bBaTXaEWEUU^eDnF;J?<jJNk;B:<jys
ysWs_J<jPV:C:[Q;<j;>Z:>::::WTJWTL>Z::::::::::::::::::6:" }{TEXT -1 23 
"                    (1)" }}{PARA 0 "" 0 "" {TEXT -1 16 "\307\344\345
\361\374 \350\355\344\345\352\361\373 \363 " }{TEXT 264 2 "Z " }{TEXT 
-1 12 "\356\341\356\347\355\340\367\340\376\362: " }{TEXT 280 1 "m" }
{TEXT -1 26 " - \355\356\354\345\360 \361\362\360\356\352\350 \354\340
\362\360\350\366\373,  " }{TEXT 281 1 "i" }{TEXT -1 17 " - \355\356
\354\345\360 \361\362\356\353\341\366\340." }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 56 "\324\356\360\354\350\360\356\342\340\355\350\345 \350\361
\365\356\344\355\373\365 \344\340\355\355\373\365 \347\340\342\345\360
\370\345\355\356 \350 \354\373 \357\356\353\363\367\350\353\350 \321
\304\323" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 23 "evalm(Diff(X,t)
=A&*X); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/K%'vectorG6#7%-%%DiffG6$&
%\"xG6#\"\"\"%\"tG-F)6$&F,6#\"\"#F/-F)6$&F,6#\"\"$F/Q(pprint26\"KF%6#7
%,(*&&%\"aG6$F.F.F.F+F.F.*&&FB6$F.F4F.F2F.F.*&&FB6$F.F9F.F7F.F.,(*&&FB
6$F4F.F.F+F.F.*&&FB6$F4F4F.F2F.F.*&&FB6$F4F9F.F7F.F.,(*&&FB6$F9F.F.F+F
.F.*&&FB6$F9F4F.F2F.F.*&&FB6$F9F9F.F7F.F.Q(pprint3F;" }}}{EXCHG {PARA 
0 "" 0 "" {TEXT -1 9 "\335\362\363  \321\304\323 " }{TEXT 256 1 "n" }
{TEXT -1 72 "-\343\356 \357\356\360\377\344\352\340 \354\356\346\355
\356 \357\360\345\344\361\362\340\342\350\362\374 \342 \342\350\344
\345 \356\344\355\356\343\356 \344\350\364\364\345\360\345\355\366\350
\340\353\374\355\356\343\356 \363\360\340\342\355\345\355\350\377 " }}
{PARA 0 "" 0 "" {TEXT -1 16 "\362\356\343\356 \346\345 \357\356\360
\377\344\352\340 " }{TEXT 257 1 "n" }{TEXT -1 50 " \356\362\355\356
\361\350\362\345\353\374\355\356 \353\376\341\356\351 \350\347 \357
\345\360\345\354\345\355\355\373\365 \342\345\352\362\356\360\340 \360
\345\370\345\355\350\351 " }{TEXT 258 1 "\325" }{TEXT -1 11 ". \304
\353\377 \375\362\356\343\356" }}{PARA 0 "" 0 "" {TEXT -1 62 "\347\340
\357\350\370\345\354 \361\353\345\344\363\376\371\363\376 \361\350\361
\362\345\354\363 \353\350\355\345\351\355\373\365 \340\353\343\345\341
\360\340\350\367\345\361\352\350\365 \363\360\340\342\355\345\355\350
\351 \361 " }{TEXT 259 2 "n " }{TEXT -1 15 "\355\345\350\347\342\345
\361\362\355\373\354\350 \350 " }}{PARA 0 "" 0 "" {TEXT -1 65 "\357
\360\340\342\356\351 \367\340\361\362\374\376 \342 \342\350\344\345 \+
\342\345\352\362\356\360\340-\361\362\356\353\341\366\340 \357\360\356
\350\347\342\356\344\355\373\365 \375\362\356\351 \357\345\360\345\354
\345\355\355\356\351:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 83 "\324\356
\360\354\340\353\374\355\356 \355\345 \350\354\345\345\362 \347\355
\340\367\345\355\350\377, \367\362\356 \361\362\356\350\362 \342 \357
\360\340\342\356\351 \367\340\361\362\350 \321\304\323. \317\356\375
\362\356\354\363 \354\340\362\360\350\366\363 Z \354\356\346\355\356 \+
" }}{PARA 0 "" 0 "" {TEXT -1 37 "\347\340\354\345\355\350\362\374 \355
\340 \342\345\352\362\356\360 \361 \362\345\354 \346\345 \350\354\345
\355\345\354 Z." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "Z:=vecto
r(n,[seq(z[i],i=1..n)]):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 34 "\322
\340\352\350\354 \356\341\360\340\347\356\354, \354\356\346\355\356 \+
\347\340\357\350\361\340\362\374 \321\313\300\323" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 15 "evalm(B&*X=Z): " }{TEXT -1 236 "\342 \357
\360\340\342\356\351 \367\340\361\362\350 \360\340\342\345\355\361\362
\342\340 \354\356\346\345\362 \361\362\356\377\362\374 \353\376\341
\356\351 \342\345\352\362\356\360-\361\362\356\353\341\345\366        \+
                                                                      \+
                                                        \354\340\362
\360\350\366\373 Z. \304\353\377 \357\360\350\354\345\360\340 \342\347
\377\362 \357\360\356\361\362\356 \342\345\352\362\356\360 Z." }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 84 "\320\345\370\340\377 \375\362\363 \+
\361\350\361\362\345\354\363  \342 \361\350\354\342\356\353\374\355
\356\354 \342\350\344\345 \356\362\355\356\361\350\362\345\353\374\355
\356 \356\344\355\356\351 \350\347 \355\345\350\347\342\345\361\362
\355\373\365 x[s], \354\373 \362\345\354 " }}{PARA 0 "" 0 "" {TEXT -1 
46 "\361\340\354\373\354 \357\356\353\363\367\350\354 \356\344\355\356
 \344\350\364\364\345\360\345\355\366\350\340\353\374\355\356\345 \363
\360\340\342\355\345\355\350\345." }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 23 "X:=linsolve(B,Z): X[s];" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#*&,6*(&%\"aG6$\"\"\"\"\"#F)&F'6$F*F)F)&%\"zG6#F)F)!\"\"*(&F'6$F*
\"\"$F)&F'6$F4F*F)F-F)F0*&&F'6$F*F*F)&F.6#F*F)F0*&&F'6$F)F)F)F:F)F0*(&
F'6$F4F4F)F8F)F-F)F)*(F=F)F-F)F8F)F)*(F=F)F-F)F@F)F)*&F@F)F:F)F0*(&F'6
$F)F4F)&F'6$F4F)F)F-F)F0&F.6#F4F)F),.*(FHF)F&F)F2F)F)*(F+F)F&F)F@F)F0*
(F=F)F2F)F5F)F0*(FHF)FFF)F8F)F0*(F+F)FFF)F5F)F)*(F=F)F8F)F@F)F)F0" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 49 "\300\361\361\356\366\350\350\360
\363\377 \344\340\353\345\345 x[s](t) \361 z[0], \347\340\357\350\370
\345\354 \357\356\353\350\355\356\354:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 14 "p:=X[s]-z[0]: " }{TEXT -1 33 "\347\344\345\361\374 \+
\344\356\353\346\355\356 \361\362\356\377\362\374 \360\345\370\345\355
\350\345 X[s]." }}}{EXCHG {PARA 0 "" 0 "" {TEXT 312 10 "\317\360\350
\354\345\367\340\355\350\345" }{TEXT -1 12 ". \304\353\377 \342\361
\345\365  " }{TEXT 314 1 "s" }{TEXT -1 10 " \357\356\353\350\355\356
\354\373 " }{TEXT 313 1 "p" }{TEXT -1 49 " \356\344\350\355\340\352
\356\342\373 (\357\360\356\342\345\360\345\355\356). \316\344\355\340
\352\356, X[1] \361\350\353\374\355\356 \356\362\353\350-" }}{PARA 0 "
" 0 "" {TEXT -1 10 "\367\340\345\362\361\377 \356\362 " }{TEXT 315 1 "
X" }{TEXT -1 1 "[" }{TEXT 317 1 "s" }{TEXT -1 19 "] \342\355\363\362
\360\350 \347\340\344\340\355\355\356\343\356 " }{TEXT 316 1 "s" }
{TEXT -1 1 "." }}{PARA 0 "" 0 "" {TEXT -1 74 "\310\353\350 \357\356
\361\353\345 \356\367\345\342\350\344\355\373\365 \363\357\360\356\371
\345\355\350\351, \352\356\362\356\360\373\345 \344\340\376\362 \355
\350\346\345 \357\360\350\342\356\344\350\354\373\345 \356\357\366\350
\350, \342 \342\350\344\345:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 43 "p:=sort(collect(p,\{seq(z[i],i=1..n)\}),`z`):" }}}{EXCHG {PARA 
0 "" 0 "" {TEXT -1 31 "\317\356\344\360\356\341\355\345\345 \361\354
\356\362\360\350 \2474, \357\363\355\352\362 1.  " }}}{EXCHG {PARA 0 "
" 0 "" {TEXT -1 15 "\327\362\356\341\373 \357\360\350\342\345\361\362
\350 " }{TEXT 267 1 "\360" }{TEXT -1 60 " \352 \361\362\340\355\344
\340\360\362\355\356\351 \364\356\360\354\345 \354\355\356\343\356\367
\353\345\355\340 \303\363\360\342\350\366\340, \342\373\344\345\353
\350\354 \342 \357\356\353\350\355\356\354\345 " }{TEXT 266 2 "\360 " 
}}{PARA 0 "" 0 "" {TEXT -1 46 "\352\356\375\364\364\350\366\350\345
\355\362 \357\360\350 z[n] (\357\360\350 \361\362\340\360\370\345\351 \+
\357\360\356\350\347\342\356\344\355\356\351)" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 18 "Kn:=coeff(p,z[n]):" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 84 " \350 \357\356\344\345\353\350\354 \342\361\345 \367\353
\345\355\373 \375\362\356\343\356 \357\356\353\350\355\356\354\340 \+
\355\340 \375\362\356\362 \352\356\375\364\364\350\366\350\345\355\362
 (\342 \357\360\345\344\357\356\353\356\346\345\355\350\350, \367\362
\356 \356\355 \355\345 " }}{PARA 0 "" 0 "" {TEXT -1 82 "\360\340\342
\345\355 \355\363\353\376). \322\356\343\344\340 \357\360\350 z[n] \+
\357\356\353\363\367\350\354 \352\356\375\364\364\350\366\350\345\355
\362 \342\361\345\343\344\340 \341\356\353\374\370\350\351 \355\363
\353\377, \367\345\343\356 \362\360\345\341\363\345\362 " }}{PARA 0 "
" 0 "" {TEXT -1 16 "\362\345\356\360\345\354\340 \303\363\360\342\350
\366\340." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 8 "p:=p/Kn:" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 23 "\321\356\341\345\360\345\354 \352
\356\375\364\364\350\366\350\345\355\362\373 \342 " }{TEXT 297 2 "\360
 " }{TEXT -1 3 "\357\360\350" }{TEXT 299 1 " " }{TEXT -1 0 "" }{TEXT 
298 1 "z" }{TEXT -1 1 "[" }{TEXT 300 1 "i" }{TEXT -1 30 "] \350 \363
\357\356\360\377\344\356\367\350\354 \350\365 \360\340\361\357\356\353
\356\346\345\355\350\345" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 
"p:=sort(collect(p,\{seq(z[i],i=0..n)\}),`z`):" }}}{EXCHG {PARA 0 "" 
0 "" {TEXT -1 72 "\317\356\353\363\367\345\355\355\373\351 \360\345
\347\363\353\374\362\340\362 \361\360\340\342\355\350\354 \361 \344
\345\362\345\360\354\350\355\340\355\362\356\354 \365\340\360\340\352
\362\345\360\350\361\362\350\367\345\361\352\356\351 \354\340\362\360
\350\366\373 " }{TEXT 296 2 "\314 " }{TEXT -1 1 ":" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 26 "kk:=det(M): collect(kk,k):" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT 287 10 "\317\360\350\354\345\367\340\355\350\345
" }{TEXT -1 55 ". \312\356\375\364\364\350\366\350\345\355\362\373 \+
\357\360\350 z[0],...,z[i],...z[n] \355\345 \347\340\342\350\361\377
\362 \356\362 " }{TEXT 282 1 "s" }{TEXT -1 22 ", \361\356\365\360\340
\355\377\377 \355\345\350\347\354\345\355\355\373\354 " }}{PARA 0 "" 
0 "" {TEXT -1 9 "\361\342\356\351 \342\350\344." }}}{EXCHG {PARA 258 "
" 0 "" {TEXT -1 47 "\322\340\352\350\354 \356\341\360\340\347\356\354,
 \354\373 \361\342\345\353\350 \321\304\323 \352 \356\344\355\356\354
\363 \363\360\340\342\355\345\355\350\376 " }{TEXT 269 1 "\360" }
{TEXT -1 27 "=0, \347\340\357\350\361\340\355\355\356\354\363 \361\350
\354\342\356\353\374\355\356. " }}{PARA 258 "" 0 "" {TEXT -1 12 "\316
\341\356\347\355\340\367\345\355\350\377 " }{TEXT 270 1 "z" }{TEXT -1 
47 "[i], i=1...n \357\360\345\344\361\362\340\342\353\377\376\362 \361
\356\341\356\351 \357\360\356\350\347\342\356\344\355\373\345 \356\362
 " }{TEXT 271 7 "x[s](t)" }{TEXT -1 4 " \357\356 " }{TEXT 276 1 "t" }
{TEXT -1 9 " \357\356\360\377\344\352\340 " }{TEXT 272 1 "i" }{TEXT 
-1 2 ". " }}{PARA 258 "" 0 "" {TEXT -1 9 "\307\355\340\367\345\355\350
\345 " }{TEXT 273 2 "s " }{TEXT -1 62 "\363\352\340\347\340\355\356 \+
\342\355\340\367\340\353\345 \350 \354\356\346\345\362 \341\373\362
\374 \350\347\354\345\355\345\355\356 \342 \350\355\362\345\360\340
\352\362\350\342\355\356\354 \360\345\346\350\354\345. " }}{PARA 0 "" 
0 "" {TEXT 295 10 "\317\360\350\354\345\367\340\355\350\345" }{TEXT 
-1 29 ". \307\344\345\361\374 \354\356\346\355\356 \342\354\345\361
\362\356 \354\340\362\360\350\366\373 " }{TEXT 288 1 "\302" }{TEXT -1 
22 " \350\361\357\356\353\374\347\356\342\340\362\374 \354\340\362\360
\350\366\363 " }{TEXT 289 1 "W" }{TEXT -1 5 "[s], " }{TEXT 290 1 "s" }
{TEXT -1 6 "=1,..," }{TEXT 291 1 "n" }{TEXT -1 1 "." }}}{EXCHG {PARA 
0 "" 0 "" {TEXT -1 64 "\304\340\353\345\345 \355\345\356\341\365\356
\344\350\354\356 \347\340\344\340\362\374 \352\356\355\352\360\345\362
\355\373\345 \347\355\340\367\345\355\350\377 \352\356\354\357\356\355
\345\355\362\340\354 \354\340\362\360\350\366\373 " }{TEXT 274 1 "\300
" }{TEXT -1 12 " \350 \357\360\356\342\356\344\350\362\374" }}{PARA 0 
"" 0 "" {TEXT -1 18 "\344\340\353\374\355\345\351\370\350\351 \340\355
\340\353\350\347." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 46 "N.B. \304
\356 \375\362\356\343\356 \341\353\356\352\340 \360\345\370\345\355
\350\345 \342\345\353\356\361\374 \361\350\354\342\356\353\374\355\356
. " }}}{EXCHG {PARA 0 "" 0 "" {TEXT 324 52 "\302\340\360\350\340\366
\350\350 \357\360\350\354\345\360\340 10. \321\341.\307\340\344\340
\367 \305\364\350\354\356\342, \3622, \361\362\360. 101. " }}{PARA 0 "
" 0 "" {TEXT -1 27 "\307\340\344\340\344\350\354 \352\356\354\357\356
\355\345\355\362\373 \354\340\362\360\350\366\373 " }{TEXT 275 1 "\300
" }{TEXT -1 31 ", \352\356\362\356\360\363\376 \362\345\357\345\360
\374 \356\341\356\347\355\340\367\350\354 \352\340\352 " }{TEXT 321 1 
"h" }{TEXT -1 1 ":" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 38 "h:=ma
trix(n,n, [4,1,1, 3,2,0, 2,3,4]);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>
%\"hGK%'matrixG6#7%7%\"\"%\"\"\"F+7%\"\"$\"\"#\"\"!7%F.F-F*Q(pprint46
\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 67 "\304\360\363\343\350\345 \+
\354\340\362\360\350\366\373, \357\360\350\342\356\344\377\371\350\345
 \352 \361\363\371\345\361\362\342\356\342\340\355\350\376 \356\341
\360\340\362\355\356\351 \354\340\362\360\350\366\373 B^(-1):" }}
{PARA 0 "" 0 "" {TEXT -1 92 "[4,1,5, 3,2,0, 2,3,4], [4,1,-1, 3,2,0, 2,
3,4], [4,1,1, 3,2,0, 2,3,4], [4,1,0, 3,2,0, 2,3,1]," }}{PARA 0 "" 0 "
" {TEXT -1 22 "[4,1,0, 3,2,0, 2,3,2]." }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT 319 49 "\317\345\360\345\351\344\345\354 \352 \367\350\361\353
\345\355\355\356\354\363 \360\345\370\345\355\350\376 \357\356\361\362
\340\342\353\345\355\355\356\351 \347\340\344\340\367\350" }{TEXT -1 
1 "." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 65 "\302\373\367\350\361\353
\350\354 \354\340\362\360\350\366\363 A \350 \357\356\353\350\355\356
\354 p, \357\356\344\361\362\340\342\353\377\377 \342 \355\350\365 \+
\367\350\361\353\345\355\355\373\345 \344\340\355\355\373\345" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for i from 1 to n do" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for j from 1 to n do" }}{PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 24 "p:=subs(A[i,j]=h[i,j],p)" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 6 "od:od:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "f
or i from 1 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for j from 1
 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "A[i,j]:=h[i,j]:" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "od:od:" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 13 "\350 \360\340\361\357\345\367\340\362\340\345\354" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "A[1,2]; eval(A); eval(X):" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#K%'matrixG6#7%7%\"\"%\"\"\"F)7%\"\"$\"\"#\"\"!7%F,F+F(Q(pprint56
\"" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "V:=eigenvects(A):" }}
}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 24 "M:=charmat(A,k); det(M);" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"MGK%'matrixG6#7%7%,&%\"kG\"\"\"\"
\"%!\"\"F.F.7%!\"$,&F+F,\"\"#F.\"\"!7%!\"#F0F*Q(pprint66\"" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#,**$)%\"kG\"\"$\"\"\"F(*&\"#5F()F&\"\"#F(!\"
\"*&\"#FF(F&F(F(\"#DF-" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "M
:=charmat(A,V[3][1]): A1:=eval(M): det(A1):" }}}{EXCHG {PARA 0 "" 0 "
" {TEXT -1 68 "\304\356\357\356\353\355\350\362\345\353\374\355\356 (
\344\353\377 \363\344\356\341\361\362\342\340) \342\342\345\344\270
\354 \342\345\352\362\356\360 \360\345\370\345\355\350\377 \361 \355
\356\342\373\354 \350\354\345\355\345\354 XX" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 41 "XX:=vector(n,[x1(t),x2(t),x3(t)]): XX[2];" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#-%#x2G6#%\"tG" }}}{EXCHG {PARA 0 "" 0 
"" {TEXT -1 21 "\307\340\357\350\370\345\354 \360\345\370\340\345\354
\363\376 \321\304\323," }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 108 "
sys:=diff(XX[1],t)=evalm(row(A,1)&*XX), diff(XX[2],t)=evalm(row(A,2)&*
XX),diff(XX[3],t)=evalm(row(A,3)&*XX);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#>%$sysG6%/-%%diffG6$-%#x1G6#%\"tGF-,(*&\"\"%\"\"\"F*F1F1-%#x2GF,
F1-%#x3GF,F1/-F(6$F2F-,&*&\"\"$F1F*F1F1*&\"\"#F1F2F1F1/-F(6$F4F-,(*&F=
F1F*F1F1*&F;F1F2F1F1*&F0F1F4F1F1" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 
44 "\342 \352\356\362\356\360\356\351 \354\356\346\355\356 \342\373
\344\345\353\377\362\374 \352\356\357\356\355\345\355\362\373, \355
\340\357\360\350\354\345\360" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 7 "sys[1];" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#/-%%diffG6$-%#x1G6#%\"
tGF*,(*&\"\"%\"\"\"F'F.F.-%#x2GF)F.-%#x3GF)F." }}}{EXCHG {PARA 0 "" 0 
"" {TEXT -1 51 "\322\345\357\345\360\374 \367\350\361\353\345\355\355
\356 \342\373\367\350\361\353\350\354 \347\340\355\356\342\356 \352
\356\354\357\356\355\345\355\362\373 \354\340\362\360\350\366\373 " }
{TEXT 322 1 "\302" }{TEXT -1 1 ":" }}{PARA 0 "" 0 "" {TEXT -1 35 "\340
) \342\355\340\367\340\353\345 \342\373\367\350\361\353\350\354 \361
\362\360\356\352\350 \354\340\362\360\350\366\373 " }{TEXT 323 2 "\302
 " }{TEXT -1 35 "\357\356 \356\344\355\356\351 \350\347 \342\373\370
\345 \357\360\350\342\345\344\345\355\355\373\365 \364\356\360\354\363
\353" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "row(B,1):=row(A,s):
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for j from 2 to n do" }
}{PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "row(B,j):=evalm(row(A,s)&*A^(j-1))
" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 24 "\341) \340 \357\356\362\356\354 \345\270 \352\356\354\357
\356\355\345\355\362\373" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 
"for i from 1 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for j from
 1 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "B[i,j]:=row(B,i)[j]" 
}}{PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "od:od:" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 30 "\317\360\356\342\345\360\350\354 \357\356\353\363\367\345
\355\355\373\345 \360\345\347\363\353\374\362\340\362\373" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 42 "eval(B); evalm(B^(-1)); inverse(B):
det(B);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#K%'matrixG6#7%7%\"\"%\"\"\"
F)7%\"#@\"\"*\"\")7%\"$F\"\"#j\"#`Q(pprint76\"" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#K%'matrixG6#7%7%#\"#F\"#D#!\"#\"\"&#\"\"\"F*7%#\"#(*F*#
!#<F-#\"#6F*7%#!#OF-F-#!\"$F-Q(pprint86\"" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#!#D" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 32 "\342 \362
\356\354 \367\350\361\353\345 \344\353\377 \356\341\360\340\362\355
\356\351 \354\340\362\360\350\366\373" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 42 "row(B^(-1),1);row(B^(-1),2):row(B^(-1),3):" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#K%'vectorG6#7%#\"#F\"#D#!\"#\"\"&#\"\"\"F)Q(
pprint96\"" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 79 "\322\340\352\350
\354 \356\341\360\340\347\356\354, \344\353\377 \367\350\361\353\356
\342\373\365 \344\340\355\355\373\365  \357\356\353\363\367\345\355 \+
\357\356\353\350\355\356\354, \357\360\345\344\361\362\340\342\353\377
\376\371\350\351 \356\344\355\356 \344\350\364\364\345-" }}{PARA 0 "" 
0 "" {TEXT -1 73 "\360\345\355\366\350\340\353\374\355\356\345 \363
\360\340\342\355\345\355\350\345 \342\354\345\361\362\356 \350\361\365
\356\344\355\356\351 \361\350\361\362\345\354\373 \344\350\364\364\345
\360\345\355\366\350\340\353\374\355\373\365 \363\360\340\342\355\345
\355\350\351." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "p:=simplif
y(p); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%\"pG,**&\"#F\"\"\"&%\"zG6#
F(F(F(*&\"#5F(&F*6#\"\"#F(!\"\"&F*6#\"\"$F(*&\"#DF(&F*6#\"\"!F(F1" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 21 "\317\356\353\363\367\345\355\355
\373\351 \354\355\356\343\356\367\353\345\355 " }{TEXT 302 2 "p " }
{TEXT -1 35 "\361\353\345\344\363\345\362 \357\360\356\342\345\360\350
\362\374 \355\340 \355\340\353\350\367\350\345 \352\356\360\355\377 " 
}{TEXT 307 4 "\355\356\353\374" }{TEXT -1 13 " \352\360\340\362\355
\356\361\362\350 r:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 5 "r:=0:
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 44 "for m from 0 to n-1 whi
le coeff(p,z[m])=0 do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "r:=m+1: `p
rint(r)`:" }{TEXT -1 23 "\357\345\367\340\362\374 \342 \362\345\353
\345 \357\360\356\343\360\340\354\354\373" }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT 325 10 "\317\360
\350\354\345\367\340\355\350\345" }{TEXT -1 83 ". \305\361\353\350 coe
ff(p,z[m]) = 0, \362\356 r := m + 1, else \356\361\362\340\355\356\342
 \366\350\352\353\340. \307\344\345\361\374 \356\361\362\340\355\356
\342 \350\344\270\362 \357\360\350" }}{PARA 0 "" 0 "" {TEXT -1 18 "
\357\360\350 m = 0. \317\356\375\362\356\354\363" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 2 "r;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }
}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 85 "\305\361\353\350 r = 0, \362\356
 \352\356\360\345\355\374 \355\356\353\374 \356\362\361\363\362\361
\362\342\363\345\362. \302 \357\360\356\362\350\342\355\356\354 \361
\353\363\367\340\345 \362\340\352\356\351 \352\356\360\345\355\374 \+
\350\354\345\345\362\361\377 \350 \345\343\356" }}{PARA 0 "" 0 "" 
{TEXT -1 12 "\352\360\340\362\355\356\361\362\374 r." }}{PARA 0 "" 0 "
" {TEXT -1 23 "\302\373\344\345\353\350\354 \352\356\375\364\364\350
\366\350\345\355\362\373 \342 " }{TEXT 303 2 "\360 " }{TEXT -1 4 "\357
\360\350 " }{TEXT 304 4 "z[i]" }{TEXT -1 2 ", " }{TEXT 305 1 "i" }
{TEXT -1 8 "=r, ...," }{TEXT 306 2 "n " }{TEXT -1 36 "\350\353\350, \+
\367\362\356 \362\356 \346\345 \361\340\354\356\345, \354\356\346\355
\356 \341\373\353\356 \341\373 " }}{PARA 0 "" 0 "" {TEXT -1 10 "\361
\344\345\353\340\362\374 \342 " }{TEXT 308 1 "\360" }{TEXT -1 6 "3 \+
\357\360\350 " }{TEXT 309 1 "g" }{TEXT -1 1 "^" }{TEXT 310 2 "i " }
{TEXT -1 10 "(\361\354. \355\350\346\345)" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 20 "for m from r to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 
1 0 31 "b[n-m]:=simplify(coeff(p,z[m]))" }}{PARA 0 "> " 0 "" {MPLTEXT 
1 0 3 "od:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 28 "\340 \362\340\352
\346\345 \357\360\350 z[i], i = 0..r-1" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 22 "for m from 0 to r-1 do" }}{PARA 0 "> " 0 "" {MPLTEXT 
1 0 9 "b[n-m]:=0" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 48 "\302\350\347\363\340\353\350\347\340\366
\350\377 \357\356\353\363\367\345\355\355\373\365 \352\356\375\364\364
\350\366\350\345\355\362\356\342 \357\356\353\350\355\356\354\340 p" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 54 "b[0]; b[1]: b[2]: b[n]; co
nvert(b,list); b[n-r]: b[r]:" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"\"
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#!#D" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#7&\"\"\"!#5\"#F!#D" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 79 "\302 \+
\360\345\347\363\353\374\362\340\362\345 \354\356\346\355\356 \347\340
\357\350\361\340\362\374 \357\356\353\363\367\345\355\355\356\345 \362
\340\352\350\354 \356\341\360\340\347\356\354 \344\350\364\364\345\360
\345\355\366\350\340\353\374\355\356\345 \363\360\340\342\355\345\355
\350\345" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 40 "dur:=sum(b[n-k]
*diff(x(t),t$k), k=0..n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%$durG,*
*&\"#D\"\"\"-%\"xG6#%\"tGF(!\"\"*&\"#FF(-%%diffG6$F)F,F(F(*&\"#5F(-F16
$F)-%\"$G6$F,\"\"#F(F--F16$F)-F86$F,\"\"$F(" }}}{EXCHG {PARA 0 "" 0 "
" {TEXT -1 84 "\304\340\353\345\345, \345\361\353\350 \352\356\360\355
\350 \365\340\360\340\352\362\345\360\350\361\362\350\367\345\361\352
\356\343\356 \363\360\340\342\355\345\355\350\377 \363\344\340\353\356
\361\374 \342\373\367\350\361\353\350\362\374 \350\353\350 \356\355
\350 \350\347\342\345\361\362\355\373, " }}{PARA 0 "" 0 "" {TEXT -1 
83 "\362\356 \354\356\346\355\356 \361\360\340\347\363 \347\340\357
\350\361\340\362\374 \360\345\370\345\355\350\345 \344\350\364\364\345
\360\345\355\366\350\340\353\374\355\356\343\356 \363\360\340\342\355
\345\355\350\377. \305\353\350 \342\373\367\350\361\353\345\355\350
\345 \352\356\360\355\345\351 " }}{PARA 0 "" 0 "" {TEXT -1 82 "\342 \+
\356\341\371\345\354 \342\350\344\345 \355\345 \342\356\347\354\356
\346\355\356, \362\356 \357\360\356\342\345\361\362\350 \350\361\361
\353\345\344\356\342\340\355\350\345 \361\350\361\362\345\354\373 \355
\340 \363\361\362\356\351\367\350\342\356\361\362\374 \357\356 \303
\363\360-" }}{PARA 0 "" 0 "" {TEXT -1 86 "\342\350\366\363 \361\354. \+
\2473, \357\363\355\352\362 1 (\361\354. \364\340\351\353 \"...\312
\356\354\357\322\345\365\355\\Maple\\\304\350\364\323\360\\\323\361
\362\356\351\367\350\342\356\361\362\374\317\356\303\363\360\342\350
\366\363.mws\") \350 " }}{PARA 0 "" 0 "" {TEXT -1 73 "\355\340\351\362
\350 \345\270 \360\345\370\345\355\350\345 \354\345\362\356\344\356
\354, \350\347\353\356\346\345\355\355\373\354, \355\340\357\360\350
\354\345\360,  \342 \2474, \357\363\355\352\362 2 \350\353\350 \364
\340\351\353\345 " }}{PARA 0 "" 0 "" {TEXT -1 74 "\"...\312\356\354
\357\322\345\365\355\356\353\\\314\345\362\356\344\317\360\350\357\340
\361\\\316\341\356\341\371\305\371\270\320\340\347\314\345\362\356\344
\317\360\350\357\340\361\301\345\347\312\356\354\354\345\355_\302\340
\355\304\345\360\317\356\353\374.mws\"" }}}{SECT 0 {PARA 257 "" 0 "" 
{TEXT -1 41 "(\315\345) \316\341\377\347\340\362\345\353\374\355\340
\377 \357\360\356\366\345\344\363\360\340. \317\356 \360\356\353\350
\355\356\354\363 " }{TEXT 294 1 "\360" }{TEXT -1 33 " \354\356\346\355
\356 \347\340\357\350\361\340\362\374 \344\350\364\364\345\360\345\355
\366\350\340\353\374\355\356\345 " }}{PARA 257 "" 0 "" {TEXT -1 18 "
\363\360\340\342\355\345\355\350\345 \357\356\360\377\344\352\340 " }
{TEXT 293 1 "n" }{TEXT 292 0 "" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 13 "p1:=sort(p); " }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#p1G,**&\"#F
\"\"\"&%\"zG6#F(F(F(*&\"#5F(&F*6#\"\"#F(!\"\"&F*6#\"\"$F(*&\"#DF(&F*6#
\"\"!F(F1" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "`D[1$u](x)(t)`
: `Diff(x(t),t$u)`:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for \+
u from 0 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 45 "p4:=subs(z[u]=D
[1$u](x)(t),p1): p1:=sort(p4):" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od
:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 35 "\302\350\347\363\340\353\350
\347\340\366\350\377 \357\356\353\363\367\345\355\355\356\343\356 \360
\345\347\363\353\374\362\340\362\340" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 3 "p4;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,**&\"#D\"\"\"-
%\"xG6#%\"tGF&!\"\"*&\"#FF&--%\"DG6#F(F)F&F&*&\"#5F&---%#@@G6$F0\"\"#F
1F)F&F+---F76$F0\"\"$F1F)F&" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 59 "
\312\356\355\342\345\360\362\350\360\356\342\340\355\350\345 \356\357
\345\360\340\362\356\360\340 D \342 \356\341\373\367\355\356\345 \355
\340\357\350\361\340\355\350\345 \357\360\356\350\347\342\356\344\355
\373\365" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 25 "p4:=convert(p4,
 diff, x);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#p4G,**&\"#D\"\"\"-%\"
xG6#%\"tGF(!\"\"*&\"#FF(-%%diffG6$F)F,F(F(*&\"#5F(-F16$F)-%\"$G6$F,\"
\"#F(F--F16$F)-F86$F,\"\"$F(" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 37 "
\321\356\361\362\340\342\350\354 \365\340\360\340\352\362\345\360\350
\361\362\350\367\345\361\352\356\345 \363\360\340\342\355\345\355\350
\345" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 6 "p2:=p:" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for i from 0 to n do" }}{PARA 0 "> \+
" 0 "" {MPLTEXT 1 0 35 "p3:=subs(z[i]=g^i,p2):p2:=sort(p3):" }}{PARA 
0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 
63 "\317\360\356\342\345\344\270\354 \342\350\347\363\340\353\350\347
\340\366\350\376 \357\356\353\363\367\345\355\355\356\343\356 \365\340
\360\340\352\362\345\360\350\361\362\350\367\345\361\352\356\343\356 \+
\363\360\340\342\355\345\355\350\377" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 3 "p3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,**$)%\"gG\"\"$
\"\"\"F(*&\"#5F()F&\"\"#F(!\"\"*&\"#FF(F&F(F(\"#DF-" }}}{EXCHG {PARA 
0 "" 0 "" {TEXT -1 49 "\350 \342\373\367\350\361\353\345\355\350\345 \+
\352\356\360\355\345\351 \365\340\360\340\352\362\345\360\350\361\362
\350\367\345\361\352\356\343\356 \363\360\340\342\355\345\355\350\377
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 33 "kor:=solve(p3=0,g): kor
;  kor[n]:" }}{PARA 12 "" 1 "" {XPPMATH 20 "6%,(*&\"\"'!\"\",&\"$!)*\"
\"\"*&\"#7F)\"%@O#F)\"\"#F)#F)\"\"$F)*(\"#QF)F0F&F'#F&F0F)#\"#5F0F),**
&F+F&F'F/F&*(\"#>F)F0F&F'F3F&F4F)*(^#F-F)F0F-,&*&F%F&F'F/F)*(F2F)F0F&F
'F3F&F)F),**&F+F&F'F/F&*(F9F)F0F&F'F3F&F4F)*(^##F&F.F)F0F-F<F)F)" }}}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 85 "\302 \360\345\347\363\353\374\362
\340\362\345, \362\340\352\350\354 \356\341\360\340\347\356\354, \355
\340\351\344\345\355\356 \344\350\364\364\345\360\345\355\366\350\340
\353\374\355\356\345 \363\360\340\342\355\345\355\350\345 \3604 \350 \+
\342\373\367\350\361\353\345\355\373 \352\356\360\355\350 " }}{PARA 0 
"" 0 "" {TEXT -1 86 "\345\343\356 \365\340\360\340\352\362\345\360\350
\361\362\350\367\345\361\352\356\343\356 \363\360\340\342\355\345\355
\350\377 \3603. \322\345\357\345\360\374 \354\356\346\355\356 \347\340
\357\350\361\340\362\374 \345\343\356 \360\345\370\345\355\350\345, \+
\355\340\357\360\350\354\345\360, \357\356 " }}{PARA 0 "" 0 "" {TEXT 
-1 66 "\352\356\360\355\377\354 \365\340\360\340\352\362\345\360\350
\361\362\350\367\345\361\352\356\343\356 \363\360\340\342\355\345\355
\350\377 \350\353\350, \350\361\357\356\353\374\347\363\377 \356\357
\366\350\376 dsolve. " }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 78 "\304\353
\377 \363\344\356\341\361\362\342\340 \344\340\353\374\355\345\351\370
\345\343\356 \350\361\357\356\353\374\347\356\342\340\355\350\377 \357
\356\353\363\367\345\355\355\356\343\356 \344\350\364\364\345\360\345
\355\366\350\340\353\374\355\356\343\356 \363\360\340\342\355\345\355
\350\377" }}{PARA 0 "" 0 "" {TEXT -1 17 "\357\360\350\361\342\356\350
\354 \345\354\363 \350\354\377 " }{TEXT 301 2 "eq" }}}{EXCHG {PARA 0 "
> " 0 "" {MPLTEXT 1 0 9 "eq:=p4=0;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#
>%#eqG/,**&\"#D\"\"\"-%\"xG6#%\"tGF)!\"\"*&\"#FF)-%%diffG6$F*F-F)F)*&
\"#5F)-F26$F*-%\"$G6$F-\"\"#F)F.-F26$F*-F96$F-\"\"$F)\"\"!" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 42 "\315\340\351\344\345\354 \360\345\370\345
\355\350\345 \344\350\364\364\345\360\345\355\366\350\340\353\374\355
\356\343\356 \363\360\340\342\355\345\355\350\377" }{TEXT 318 3 " eq" 
}{TEXT -1 35 ", \347\340\357\350\361\373\342\340\377 \345\343\356 \361
\360\340\347\363 \344\353\377 \350\347\342\345\361\362\355\373\365" }}
{PARA 0 "" 0 "" {TEXT -1 12 "\352\356\360\355\345\351 kor, " }{TEXT 
330 53 "\352\356\362\356\360\356\345 \355\345\347\340\342\350\361\350
\354\356 \356\362 s \341\363\344\345\362 \350\354\345\362\374 \356\344
\350\355 \350 \362\356\362 \346\345 \342\350\344" }}}{EXCHG {PARA 0 ">
 " 0 "" {MPLTEXT 1 0 49 "xs:=t->sum(C[jj]*exp(kor[jj]*t), jj=1..n); xs
(t);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%#xsGf*6#%\"tG6\"6$%)operator
G%&arrowGF(-%$sumG6$*&&%\"CG6#%#jjG\"\"\"-%$expG6#*&&%$korGF2F49$F4F4/
F3;F4%\"nGF(F(F(" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#,(*&&%\"CG6#\"\"\"
F(-%$expG6#*&,(*&\"\"'!\"\",&\"$!)*F(*&\"#7F(\"%@O#F(\"\"#F(#F(\"\"$F(
*(\"#QF(F9F0F1#F0F9F(#\"#5F9F(F(%\"tGF(F(F(*&&F&6#F7F(-F*6#*&,**&F4F0F
1F8F0*(\"#>F(F9F0F1F<F0F=F(*(^#F6F(F9F6,&*&F/F0F1F8F(*(F;F(F9F0F1F<F0F
(F(F(F?F(F(F(*&&F&6#F9F(-F*6#*&,**&F4F0F1F8F0*(FIF(F9F0F1F<F0F=F(*(^##
F0F7F(F9F6FLF(F(F(F?F(F(F(" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 53 "
\350\353\350, \360\345\370\340\377 \361\356\356\362\342\345\362\361
\362\342\363\376\371\345\345 \344\350\364\364\345\360\345\355\366\350
\340\353\374\355\356\345 \363\360\340\342\355\345\355\350\345" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "resh:=dsolve(eq,x(t));" }}
{PARA 12 "" 1 "" {XPPMATH 20 "6#>%%reshG/-%\"xG6#%\"tG,(*&%$_C1G\"\"\"
-%$expG6#,$**\"\"'!\"\",(*$),&\"$!)*F-*&\"#7F-\"%@O#F-\"\"#F-#F>\"\"$F
-F-\"#wF-*&\"#?F-)F8#F-F@F-F-F-F8#F4F@F)F-F-F-F-*(%$_C2GF--F/6#,$**F;F
4F8FF,(F6F-FAF-*&\"#SF-FDF-F4F-F)F-F4F--%$sinG6#,$**F;F4F8FF,&*&F@F=F7
F-F-*&FAF-F@F=F4F-F)F-F-F-F4*(%$_C3GF-FIF--%$cosGFRF-F-" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 58 "\317\360\356\342\345\344\270\354 \357\360
\356\342\345\360\352\363 \357\356\353\363\367\345\355\355\356\343\356 \+
\360\345\370\345\355\350\377, \357\356\344\361\362\340\342\353\377\377
 \345\343\356 \342 eq" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "PR
:=subs(x(t)=rhs(resh),eq):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 45 "
\350 \344\340\353\345\345, \357\360\350 \355\345\356\341\365\356\344
\350\354\356\361\362\350, \357\360\356\342\356\344\377 \363\357\360
\356\371\345\355\350\345" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 
"simplify(lhs(PR));" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#\"\"!" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 52 "\310\362\340\352, \357\356\353\363
\367\345\355\355\356\345 \360\345\370\345\355\350\345 \363\344\356\342
\353\345\362\342\356\360\377\345\362 \363\360\340\342\355\345\355\350
\376 eq." }}}{SECT 0 {PARA 3 "" 0 "" {TEXT -1 0 "" }{TEXT 327 26 "\317
\360\350\341\353\350\346\345\355\355\356\345 \360\345\370\345\355\350
\345 evalf" }}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "resh:=evalf(re
sh,10);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%reshG/-%\"xG6#%\"tG,(*&%
$_C1G\"\"\"-%$expG6#,$*&$\"+JF<%Q'!\"*F-F)F-F-F-F-**$F-\"\"!F-%$_C2GF-
-F/6#,$*&$\"+NO\"z!=F5F-F)F-F-F--%$sinG6#,$*&$\"+Sz+Y!)!#5F-F)F-F-F-!
\"\"*(%$_C3GF-F:F--%$cosGFBF-F-" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 
56 "\317\356\344\361\362\340\342\350\354 \360\345\370\345\355\350\345 \+
\342 \350\361\365\356\344\355\356\345 \344\350\364\364\345\360\345\355
\366\350\340\353\374\355\356\345 \363\360\340\342\355\345\355\350\345 \+
" }{TEXT 328 2 "eq" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 29 "PRn:=
subs(x(t)=rhs(resh),eq):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 38 "\350 \+
\357\360\356\342\345\344\345\354 \357\360\356\342\345\360\352\363 \355
\340 \362\356\346\344\345\361\362\342\345\355\355\356\361\362\374" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "simplify(lhs(PRn)):" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "collect(%,_C1):" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "collect(%,_C2):" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 16 "collect(%,_C3); " }{TEXT -1 39 "- \361\356
\341\360\340\355\373 \352\356\375\364\364\350\366\350\345\355\362\373 \+
\357\360\350 \352\356\355\361\362\340\355\362\340\365. " }}{PARA 11 "
" 1 "" {XPPMATH 20 "6#$\"\"!F$" }}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 
83 "\301\356\353\345\345 \361\353\356\346\345\355 \342\356\357\360\356
\361 \342\373\341\356\360\340 \357\356\361\362\356\377\355\355\373\365
 _\3211, _\3212, _\3213  \350 \344\360., \352 \352\356\362\356\360\356
\354\363 \354\373 \342\345\360\355\270\354\361\377 " }}{PARA 0 "" 0 "
" {TEXT -1 7 "\357\356\347\346\345. " }}{PARA 0 "" 0 "" {TEXT 326 10 "
\317\360\350\354\345\367\340\355\350\345" }{TEXT -1 69 ". \304\353\377
 \357\356\361\362\360\356\345\355\350\377 \343\360\340\364\350\352\340
 \342\356\347\374\354\345\354 \357\360\356\350\347\342\356\353\374\355
\373\345 \347\355\340\367\345\355\350\377 \375\362\350\365 \352\356
\355\361\362\340\355\362." }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 88 "\310
\362\340\352,  \360\345\370\345\355\350\345 dur, \350\353\350 eq -  \+
\342 \342\350\344\345 xs(t) (\350\353\350 resh) \355\340\351\344\345
\355\356. \316\355\356 \346\345 \377\342\353\377\345\362\361\377 \356
\344\355\350\354 \350\347 " }}{PARA 0 "" 0 "" {TEXT -1 13 "\360\345
\370\345\355\350\351 \321\304\323. " }{TEXT 343 5 "\305\343\356 (" }
{TEXT 333 2 "xs" }{TEXT 344 1 "(" }{TEXT 334 1 "t" }{TEXT 345 35 ")) \+
\355\363\346\355\356 \357\360\350\355\377\362\374 \347\340  \360\345
\370\345\355\350\345 xk[s]." }}{PARA 0 "" 0 "" {TEXT -1 68 "\322\360
\345\341\363\345\362\361\377 \355\340\351\362\350 \344\360\363\343\350
\345 \360\345\370\345\355\350\377 \321\304\323. \321\356\343\353\340
\361\355\356 \342\373\370\345 \350\347\353\356\346\345\355\355\356\351
 \362\345\356\360\350\350 " }}{PARA 0 "" 0 "" {TEXT -1 27 "\357\356
\361\362\363\357\350\354 \361\353\345\344\363\376\371\350\354 \356\341
\360\340\347\356\354:" }}{PARA 0 "" 0 "" {TEXT -1 50 "1. \315\340\365
\356\344\350\354 \342\345\352\362\356\360 \357\360\356\350\347\342\356
\344\355\373\365 \357\356\353\363\367\345\355\355\356\343\356 \360\345
\370\345\355\350\377 " }{TEXT 331 2 "xs" }{TEXT -1 1 "(" }{TEXT 332 1 
"t" }{TEXT -1 1 ")" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "dZ:=v
ector(n,[]):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "for k from \+
1 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "dZ[k]:=diff(xs(t),t$k)
" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT 329 10 "\317\360\350\354\345\367\340\355\350\345" }{TEXT -1 74 "
. \315\350\346\345 \342\361\345 \342\373\360\340\346\345\355\350\377 d
Z, xk[1],..., xk[n] \347\340\352\360\373\362\373, \362\340\352 \352
\340\352 \342 \347\340\357\350\361\350 \356\367\345\355\374 " }}{PARA 
0 "" 0 "" {TEXT -1 56 "\344\353\350\355\355\373. \317\360\350 \355\345
\356\341\365\356\344\350\354\356\361\362\350 \350\365 \354\356\346\355
\356 \356\362\352\360\373\362\374 \350 \357\356\361\354\356\362\360
\345\362\374." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 9 "eval(dZ):" 
}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 66 "---------------------  77777777
777 \320\340\347\356\341\360\340\362\374\361\377 -------------------" 
}}}{EXCHG {PARA 0 "" 0 "" {TEXT 348 29 "\305\361\353\350 B^(-1) \355
\345 \361\363\371\345\361\362\342\363\345\362, \362\356" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "for k from 1 to rk do" }}{PARA 0 ">
 " 0 "" {MPLTEXT 1 0 25 "Zr[k]:=dZ[k]-B[k,n]*xs(t)" }}{PARA 0 "> " 0 "
" {MPLTEXT 1 0 3 "od:" }}{PARA 8 "" 1 "" {TEXT -1 60 "Error, final val
ue in for loop must be numeric or character\n" }}}{EXCHG {PARA 0 "> " 
0 "" {MPLTEXT 1 0 10 "evalm(Zr);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#%#
ZrG" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 76 "\304\340\353\345\345 \340
\361\361\356\366\350\350\360\356\342\340\362\374 Zr \361 dZ \350 \357
\360\356\342\356\344\350\362\374 \342\373\357\356\353\355\345\355\350
\345 \362\345\365 \346\345 \357\360\356\366\345\344\363\360, \352\356
\362\356\360\373\345 " }}{PARA 0 "" 0 "" {TEXT -1 23 "\347\340\352\360
\345\357\353\345\355\373 \347\340 \357\356\361\345\344\355\345\351." }
}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 51 "--------------------------------
-------777777777777" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 22 "\302\342
\345\344\270\354 \342\345\352\362\356\360 \360\345\370\345\355\350\351
 " }{TEXT 342 2 "xk" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 18 "xk:=
vector(n,[]): " }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 25 "2. \310\361\365
\356\344\377 \350\347 \357.7 \355\340\365\356\344\350\354 " }{TEXT 
335 2 "xk" }{TEXT -1 1 "[" }{TEXT 336 1 "j" }{TEXT -1 8 "] = row(" }
{TEXT 337 1 "B" }{TEXT -1 6 "^(-1)," }{TEXT 338 1 "j" }{TEXT -1 2 ")*
" }{TEXT 341 2 "dZ" }{TEXT -1 2 ", " }{TEXT 339 1 "j" }{TEXT -1 8 " = \+
1,..," }{TEXT 340 1 "n" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 20 "f
or k from 1 to n do" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "if k=s then \+
" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 12 "xk[k]:=xs(t)" }}{PARA 0 "> " 0 
"" {MPLTEXT 1 0 40 "else xk[k]:=evalm(row(B^(-1),k)&*dZ) fi:" }}{PARA 
0 "> " 0 "" {MPLTEXT 1 0 3 "od:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 15 "eval(xk[2](t)):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 69 "\317
\360\356\342\345\344\345\354 \357\360\356\342\345\360\352\363 \355\340
 \363\344\356\342\353\345\362\342\356\360\345\355\350\345 \357\356\353
\363\367\345\355\355\373\365 \360\345\370\345\355\350\351 \350\361\365
\356\344\355\356\351 \321\304\323. " }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 58 "Prov:=seq(subs(seq(XX[j]=xk[j],j=1..n),sys[k]),   k=1
..n):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 48 "seq(simplify(lhs(P
rov[j])-rhs(Prov[j])),j=1..n);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6%\"\"
!F#F#" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 6 "\327.\362.\357." }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 38 "\317\360\356\342\345\344\270\354 \+
\362\340\352\346\345 \357\360\356\342\345\360\352\363 \347\355\340\367
\345\355\350\377 xs(t)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "x
k[s]:=evalm(row(B^(-1),s)&*dZ):" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 16 "simplify(xk[s]):" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 47 "\361
\360\340\342\355\350\354 \375\362\350 \344\342\340 \360\340\342\355
\373\365 \357\356 \356\357\360\345\344\345\353\345\355\350\376 \342
\373\360\340\346\345\355\350\377" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 28 "xs(t):simplify(xk[s]-xs(t));" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#\"\"!" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 6 "\327.\362.
\357." }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 0 "" }}}}{MARK "0 1 0" 53 }{VIEWOPTS 1 1 0 1 1 1803 1 1 1 1 }
{PAGENUMBERS 1 0 2 33 1 1 }