Современное программное обеспечение в пользовательском процессе: Сборник заданий по курсу. Глушко А.В - 14 стр.

UptoLike

Составители: 

Найдём решение при j=1
8x40@1D, y40@1D<
8InterpolatingFunction@88-1.9, 4.75<<, <>D,
InterpolatingFunction@88-1.9, 4.75<<, <>D<
При построении графиков решений используются вспомогательные функции
sty41 = 8Thickness@0.007 - 0.00027 * #D, GrayLevel@0.0 + 0.013 * #D< &;
poi4 = H100 + 10 * #L &;
Заметим, что более эффективна цветная раскраска графиков. Для этого
функцию sty41 можно заменить, например, на sty042={-
Thickness[0.002+0.0008*j],Hue[0.9-0.18*j]}
sty42 = 8Hue@0.9 - 0.18 * #D, Thickness@0.002 + 0.0008 * #D< &;
После этого строим график
p411 = ParametricPlot@Evaluate@8x40@1D@tD, y40@1D@tD<D,
8t, -1.9, 4.75<, PlotRange Æ 88-1.1, 1.3<, 8-1.2, 1.5<<,
PlotStyle Æ sty41@1D, PlotPoints Æ poi4@1D, AxesLabel Æ 8"x", "y"<D
-1 -0.5 0.5 1
x
-1
-0.5
0.5
1
1.5
y
Graphics
8x40@2D, y40@2D<
8InterpolatingFunction@88-1.8, 4.7<<, <>D,
InterpolatingFunction@88-1.8, 4.7<<, <>D<
z
ad ok7bis.nb 14
zad ok7bis.nb                                                                 14




    Найдём решение при j=1

    8x40@1D, y40@1D<
    [email protected], 4.75<<, <>D,
      [email protected], 4.75<<, <>D<

    При построении графиков решений используются вспомогательные функции

    sty41 = [email protected] - 0.00027 * #D, [email protected] + 0.013 * #D< &;
    poi4 = H100 + 10 * #L &;

    Заметим, что более эффективна цветная раскраска графиков. Для этого
    функцию sty41 можно заменить, например, на sty042={-
    Thickness[0.002+0.0008*j],Hue[0.9-0.18*j]}

    sty42 = [email protected] - 0.18 * #D, [email protected] + 0.0008 * #D< &;
    После этого строим график

    p411 = ParametricPlot@Evaluate@8x40@1D@tD, y40@1D@tDD,
      [email protected], 4.7<<, <>D<