Главная страница Случайная страница КАТЕГОРИИ: АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Тема: Пространственные кривые. Выполнил: Масхудов Масхуд ФИТУ группа 1-5б
Лабораторная работа №2. Цель работы: Научиться исследовать свойства пространственных кривых и строить их графические образы на ЭВМ Задание: Исследовать пространственную кривую:
Ход работы: > > assume(a> 0); > assume(t, real); > r: =array(1..3, [a*cosh(t)*cos(t), a*cosh(t)*sin(t), a*t]);
>
>
>
>
>
> > db: =sqrt(chise[1]^2+chise[2]^2+chise[3]^2);
> db: =simplify(db);
> > l: =int(db, t);
> > Int(subs(z, dr), t=0..2);
>
> > tau: =simplify(evalm(rt)/dr);
> subs(z, evalm(tau));
>
> > chise: =crossprod(rt, rtt);
> db: =sqrt(chise[1]^2+chise[2]^2+chise[3]^2);
> db: =simplify(db);
> > beta: =simplify(evalm(chise)/db);
> subs(z, evalm(beta));
>
> > nu: =simplify(crossprod(beta, tau));
> subs(z, evalm(nu));
>
> > k1: =simplify(db/dr^3);
> subs(z, k1);
>
> k2: =simplify(dotprod(chise, rttt)/db^2);
> spacecurve(subs(z, evalm(r)), t=-7..7);
Вывод: В процессе работы янаучился исследовать пространственные кривые аналитически и с помощью программного обеспечения ЭВМ, строить образ заданной параметрически кривой с помощью Maple 13, вычислять параметры в каждой точке.
|