Помогите написать программу по задаче

Форум пользователей пакета Maple

Модератор: Admin

nn98
Сообщения: 4
Зарегистрирован: Пн май 21, 2018 10:20 am

Помогите написать программу по задаче

Сообщение nn98 » Пн май 21, 2018 10:28 am

Снимок экрана (240).png
Снимок экрана (240).png (25.15 КБ) 258 просмотров

Как написать программу в мапле

Kitonum
Сообщения: 2050
Зарегистрирован: Ср дек 31, 2008 1:55 pm
Откуда: г. Пенза

Re: Помогите написать программу по задаче

Сообщение Kitonum » Пн май 21, 2018 7:51 pm

Программу написать несложно, но вся проблема в том, что при этих данных поезд вообще не тронется. Если мы подставим в формулу для R начальную скорость v=0 , то получим R=100 т или 100000 кГ . Чтобы поезд начал движение тяга должна быть больше этой величины. Я взял F=107000 кГ .

Код: Выделить всё

restart;
R:=(2.5+0.05*diff(S(t),t))*Q:
Q:=40000:  F:=107000:
DE:=Q*diff(S(t),t,t)=F-R;  # Уравнение движения
ics:=S(0)=0, D(S)(0)=0;  # Начальные условия
dsolve({DE, ics});  # Решение уравнения (зависимость пути (в метрах) от времени (в секундах))
S:=unapply(rhs(%), t);  # Задание  S  как функции времени
V:=unapply(diff(S(t),t),t);  # Скорость движения как функция времени
t0:=fsolve(V(t)=12/3.6, t);  # Время (в сек) когда скорость станет 12 км/час
S(t0);  # Пройденное при этом расстояние (в метрах)
eval(R, t=t0);  # При такой тяге дальнейшее движение будет равномерным
plot(S(t), t=0..t0);

nn98
Сообщения: 4
Зарегистрирован: Пн май 21, 2018 10:20 am

Re: Помогите написать программу по задаче

Сообщение nn98 » Вт май 22, 2018 8:45 am

Снимок экрана (241).png
Снимок экрана (241).png (44.57 КБ) 227 просмотров
Снимок экрана (242).png
Снимок экрана (242).png (53.27 КБ) 227 просмотров


вот решение)))

nn98
Сообщения: 4
Зарегистрирован: Пн май 21, 2018 10:20 am

Re: Помогите написать программу по задаче

Сообщение nn98 » Вт май 22, 2018 5:36 pm

почему в решении выходит время 141 сек и расстояние 96 м

у меня в программе не получаются такие ответы

Kitonum
Сообщения: 2050
Зарегистрирован: Ср дек 31, 2008 1:55 pm
Откуда: г. Пенза

Re: Помогите написать программу по задаче

Сообщение Kitonum » Вт май 22, 2018 10:40 pm

Очевидно, что приведённое Вами решение ошибочно.