Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

ОТВЕТНИК ВСЕ В ОДНОМ. ФОРМАТ А5

.pdf
Скачиваний:
13
Добавлен:
08.02.2015
Размер:
981.9 Кб
Скачать

Задача 9.2 С помощью "Математики"найти численную длину отрезка кривой 4y2 = (x 1)5, заключенного внутри параболы y2 = x.

Использовать функцию ImplicitPlot директории Graphics и встроенную функцию NIntegrate.

Решение:

<< GraphicsImplicitPlot`

ImplicitPlot[f4y^2 == (x 1)^5; y^2 == xg; fx; 0; 3g] FindRoot [(x 1)5 == 4x; fx; 2:5g]

h h i i

l = Sqrt 1 + D 0:5(x 1)5 ; x ^2

2

2NIntegrate[l; fx; 1; 2:597013g]

51

Задача 10.1.

Две матрицы A и B удовлетворяют соотношению AB + BA = 2 B. Матрица A эрмитова. Доказать, что (cos A)B = B(sin A).

Решение.

AB = B A + 2

Воспользуемся формулой квазикоммутации:

 

 

eñëè AT = T A1, òî f(A)T = T f(A1).

 

 

 

 

 

 

 

 

Пусть f(x) = cos (x); A1 =

 

A.

 

 

 

2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

cos (A)B = B cos

 

A

 

 

 

2

 

Пусть собственные значение матрицы A, а E собственные

Воспользуемся этим:

2P

 

 

 

проекторы. Тогда f(A) =

 

f( )E .

 

 

 

 

 

 

Sp A

 

 

 

 

A = 2Sp A cos

 

 

 

 

=

 

cos 2

+ 2 E

 

 

 

X

 

 

 

 

 

 

X

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

=

sin ( )E = sin A:

2Sp A

В итоге получаем следующую формулу:

(cos A)B = B(sin A):

52

Задача 10.2 Написать функцию chords[func; x; a; b; "], которая реализует метод хорд вычисления корней уравнения. Ее аргументы:

func исследуемая функция

x; a; b имя аргумента функции и интервал, на котором находится корень уравнения

" точность вычисления корня

Решение: Итерационая формула для метода хорд:

x

i+1

= x

i

f(xi)(xi xi 1)

=

f(xi)xi 1 xif(xi 1)

 

 

f(xi) f(xi 1)

 

 

f(xi) f(xi 1)

В качестве начального приближения берем границы отрезка.

chords[f_, {x_, a_, b_}, eps_] := ({z1, z2} = {N[a], N[b]};

{z1,

z2}

//. {x1_, x2_}

->

{(x2

( f

/. x ->

x1)

-

x1 (f /. x -> x2))

 

/ ((f /. x

-> x1) -

(f /. x -> x2)), x1}

 

/; Abs[x1

-

x2]

>

eps);

Пример использования:

In: g[x_] := Sin[x] - 0.1 x h = Sin[x] - 0.1 x

Out: -0.1 x + Sin[x]

chords[h, {x, 8, 9}, 0.0001] {8.4232, 8.42321}

chords[g[x], {x, 8, 9}, 0.0001] {8.4232, 8.42321}

FindRoot[g[x], {x, 8}] {x -> 8.4232}

FindRoot[h, {x, 8}] {x -> 8.4232}

53

Задача 11.1.

 

 

 

 

 

 

 

 

 

 

Доказать, что

äëÿ

любых A и

 

B

2 R3: !A1

^ !B1 = ![2A;B],

где [A; B] векторное произведение.

 

 

 

 

Решение.

 

 

 

 

 

 

 

 

 

 

Пусть A = (A1; A2; A3); B = (B1; B2; B3).

 

 

Пусть ;1 2 R3.

 

 

1

 

 

 

 

 

 

 

Тогда !A( ) = (A; ); !B( ) = (B; ).

 

 

 

Пусть = ( 1; 2; 3); = ( 1; 2; 3).

 

 

 

(!A

^ !B)( ; ) =

!A1

( ) !B1

( ) =

(A; ) (B; )

=

1

1

 

!A1

( ) !B1

( )

 

 

(A; ) (B; )

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

=(A1 1 + A2 2 + A3 3)(B1 1 + B2 2 + B3 3)

(A1 1 + A2 2 + A3 3)(B1 1 + B2 2 + B3 3) =

=(A1B1 A1B1) 1 1 + (A2B2 A2B2) 2 2 + (A3B3 A3B3) 3; 3+

+(A1B2 B1A2) 1 2 + (A1B3 B1A3) 1 3+

(A2B1 B2A1) 2 1 + (A2B3 B2A3) 2 3+ (A3B1 B3A3) 3 1 + (A3B2 B3A2) 3 2 =

= (A2B3 B2A3)( 2 3 3 2) + (A3B1 B3A1)( 3 1 1 3)+

+ (A1B2 B1A2)( 1 2 2 1) =

=

1

2

3

 

(20)

 

A2B3 B2A3

A3B1 B3A1

A1B2 B1A2

 

 

 

1

 

2

 

3

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Пусть C = (C1; C2; C3).

 

 

 

 

 

 

Тогда

C1

C2

C3

 

 

 

 

 

 

 

!C2 ( ; ) =

 

1

2

3

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1

2

3

 

Вычислим [A; B].

54

 

 

~i

~j

~k

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

[A; B] =

 

A1 A2

A3

 

=

 

B1

B2

B3

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

~

~

~

B1A2) =

= i(A2B3

B2A3) + j(A3B1

B3A1) + k(A1B2

 

 

 

 

 

= A2B3 B2A3; A3B1 B3A1; A1B2 B1A2

Тогда !2

 

( ; ) запишется в следующем виде:

 

 

 

[A;B]

 

 

 

 

 

 

 

 

 

 

 

![2A;B]

=

 

1

2

 

3

 

 

 

 

A2B3 B2A3

A3B1 B3A1

A1B2

B1A2

 

 

 

 

 

 

1

 

2

 

 

3

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

=(20).

 

 

 

 

 

 

Получили, что ![A;B]

 

 

 

 

 

 

55

Задача 11.2 Построить базу ориентированного графа с матрицей

смежности:

0

1

1

0

0

 

 

 

 

 

 

 

0

0

0

1

0

 

 

 

 

 

 

 

1

0

0

0

0

 

 

 

 

 

 

 

0

0

0

0

0

 

 

 

 

 

 

 

0

1

0

1

1

 

 

 

 

 

 

Решение: AG матрица смежности ориентированного графа G:

 

00

0

0

1

01

 

 

00

1

0

1

01

 

0

1

1

0

0

 

 

1

1

1

0

0

 

G = B0 0

0

0

0C

 

= G + S = B0 0

0

1

0C

 

B

 

 

 

C

 

 

B

 

 

 

C

A

1 0

0

0

0

A A E

1

0

1

0

0

 

B0 1

0

1

1C

e

 

B0 1

0

1

1C

 

B

 

 

 

C

 

 

B

 

 

 

C

 

@

 

 

 

A

 

 

@

 

 

 

A

Построим граф достижимости G для графа G. Так как у графа

G имеется 5 вершин, то нужно построить матрицу достижимости с длиной пути 4, и матрица графа достижимости AG = Ae4.

 

2

 

00

1

0

1

0100

1

0

1

01

 

00

1

0

1

01

 

 

 

1

1

1

0

0

1

1

1

0

0

 

1

1

1

1

0

 

 

=

B0 0

0

1

0CB0

0

0

1

0C

=

B0 0

0

1

0C

 

 

 

B

 

 

 

CB

 

 

 

 

C

 

B

 

 

 

C

A

 

 

1

0

1

0

0

1

0

1

0

0

 

1

1

1

0

0

e

 

B0 1

0

1

1CB0

1

0

1

1C

 

B0 1

0

1

1C

 

 

 

B

 

 

 

CB

 

 

 

 

C

 

B

 

 

 

C

 

 

 

@

 

 

 

A@

 

 

 

 

A

 

@

 

 

 

A

 

 

 

 

 

 

 

01

1

1

1

01

 

 

 

 

 

 

B0 1 0 1 0C

BC

Ae4 = B1 1 1 1 0C = AG

BC

@0 0 0 1 0A 0 1 0 1 1

Тогда матрица AG графа сильной достижимости имеет вид:

56

01

0

1

0

01

B0 1 0 0 0C

BC

AG = B1 0 1 0 0C

BC

@0 0 0 1 0A 0 0 0 0 1

Компоненты сильной связности графа G: K1 = f 1; 3g, K2 = f 2g, K3 = f 4g, K4 = f 5g.

Построим граф отношения достижимости на компоненты графа G (рис. 2)

K1 />K2

!

K4 /K3

Рис. 2: Граф отношения достижимости

Минимальные компоненты: K1 = f 1; 3g è K4 = f 5g ) существует две базы графа G: B1 = f 1; 5g è B2 = f 3; 5g (т.к. содержат по одной вершине из каждой минимальной компоненты).

Ответ: Базы графа G: B1 = f 1; 5g è B2 = f 3; 5g.

57

Задача 12.1.

Зная компоненты векторного поля A, найти разложение !A1 .

Решение.

Определение

Формой степени 1 (иди, короче, 1-формой) называется линейная функция от веткора, ! : Rn ! R,

!( 1 1 + 2 2) = 1!( 1) + 2!( 2); 8 1; 2 2 R; 1; 2 2 Rn

Пусть A 2 Rn : A = (A1; A2; : : : ; An), 2 Rn.

Тогда !A1 ( ) = (A; ). (Скалярное произведение). В самом деле, пусть 1; 2 2 R; 1; 2 2 Rn:

!A1 ( 1 1 + 2 2) = (A; 1 1 + 2 2) = 1(A; 1) + 2(A; 2);

òàê êàê (A; i i) = i(A; i) = i(A; i); i = 1; 2 (в силу вещественности i).

58

12.2 Решить задачу Коши для уравнения Гамильтона-Якоби

(

@u@t + (1 + x2)@u@x = 0 ujt=0 = x

Решение:

p = ux; H = (1 + x2)p; ujt=0 = uo(xo)

 

 

 

 

 

 

 

 

 

 

 

 

 

(P_

=

 

 

 

@H =

 

 

 

 

 

 

2 XP;

 

P t=0 = @u (xo

 

)

= 1

 

 

 

 

 

 

 

 

 

 

 

_

 

 

 

 

@H

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

; Xjt=0 = x

o

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

X =

 

 

@p = 1 + X

 

 

 

 

 

 

o o

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

@x

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

j

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

@x

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

dX

= 1 + X2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

dt

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

R

 

 

 

dX

 

 

 

=

 

 

 

1dt

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

 

 

 

 

 

 

 

 

 

 

 

=

 

 

arctgX

 

 

 

= t + C1

 

 

1+ X2 = R

 

 

 

1 +X2

 

 

 

 

 

 

 

R

 

 

1+ X

 

 

 

 

 

 

 

 

 

R(

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1 p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

dX

 

 

 

1

 

 

 

dX

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

=

p tg[

 

 

 

+ 1)]

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1

 

 

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

X

 

 

 

 

 

t

 

 

 

 

C

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Xjt=0 =

1

 

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

o

 

) C1 =

 

1

 

 

 

 

 

 

 

 

 

 

 

op

 

 

 

 

 

 

tg[

C1] = x

 

 

 

arctg[x

]

 

p

 

 

 

 

 

 

 

 

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1

 

 

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

op

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

X =

 

p

 

 

 

tg[

t + arctg(x

 

 

 

 

 

)]

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

o

 

 

 

1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

p

 

 

 

 

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x

 

 

=

 

p

 

tg(arctg[X

 

 

 

]

 

 

 

 

 

t)

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

p

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

op

 

 

 

 

 

 

 

 

 

 

dP

=

 

2 XP = 2

 

 

t + arctg(x

)]P

 

t

 

 

 

 

 

 

 

 

tg[

 

 

 

 

 

 

 

 

R

 

 

dP

 

 

 

 

 

 

 

 

 

p

 

 

 

 

 

 

 

 

 

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

op

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

t + arctg(xRp ) = ;

d = pdt; dt = p

 

 

 

 

 

 

 

p

P

 

= 2

o

 

 

tg[

 

 

 

 

t + arctg(x

 

 

 

 

)]dt

 

d

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

ln(cosj2 j) + C22R

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

R

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

R

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

sin

 

 

 

 

 

 

 

 

 

 

d cos

= 2 ln j cos j + C2 =

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

cos d = 2

 

cos

ln P =

2

tg d = 2

 

 

 

 

 

 

 

 

 

P = C3 cos

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

P = C3 cos2[p

 

t + arctg(xop

 

)]

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

op

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

P jt=0 = C3 cos

 

[arctg(x

 

 

)] = 1 ) C3 =

 

cos2[arctg(xop

 

)]

 

 

 

 

 

 

 

 

 

 

 

 

 

cos2[p

 

+arctg(xop

 

)]

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

P =

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

cos2[arctg(xop

 

)]

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

t

 

 

 

P @H@P (X; P; t) H(X; P; t) dt

u(X; t) = uo(xo)t + R0

 

 

 

u(x; t) = u(xo; tR0)fo

 

 

 

 

o

 

 

 

 

 

 

 

 

 

 

 

 

(1 + X2)P

g

= xo

u(X; t) = xo

+ P (1 + X2)

 

 

 

 

jx =x (t;x)

59

Ответ:

1

 

p

 

 

p

 

 

 

 

 

 

 

 

 

 

 

 

 

u(x; t) =

p

 

tg(arctg[X

 

]

 

t)

 

 

60