Скорость при одномерном движении на Pascal

@Alextroy11 · Регистрация: 18.03.2017

Author24 — интернет-сервис помощи студентам

Материальная точка движется прямолинейно вдоль оси OX со скоростью Vx(t). Построить график зависимости x=x(t) для промежутка времени [0,6], если в момент времени t1 точка имела координату х1.
Vx(t)=2+20/(t^2+4);
t1=2;
x1=2.

@Joy · 19.03.2017, 06:32

как-то так (на счет правильности сильно сомневаюсь):

Pascal

uses GraphAbc;
const x0=2;t0=2;Ww=320;Wh=240;l=0;m=6;
function Vx(t:real):=2+20/(t*t+4);
function x(t:real):=x0+Vx(t);
function GetX(x:real):=30+(Ww div (m+1+t0))*round(x);
function GetY(y:real;k:integer):=Wh-40-(Wh div k)*round(y);
procedure PutPoint(x,y:real;k:integer);
var
  xx,yy:integer;
begin
  xx:=GetX(x);yy:=GetY(y,k);
  Circle(xx,yy,2);
  lineto(xx,yy);
  TextOut(xx,Wh-30,format('{0:.##}',x));
  TextOut(1,yy,format('{0:.##}',y));
end;
var
  k:integer;
  r:real;
begin
  SetWindowSize(Ww,Wh);
  line (30,10,30,Wh-40);
  line (30,Wh-40,Ww-10,Wh-40);
  k:=1;
  for i:integer:=l to m+x0 do while GetY(x(i),k)<10 do k:=k+1;
  MoveTo(GetX(x0),GetY(t0,k)); PutPoint(t0,x0,k); 
  for t:integer:=l+1 to m do begin
    r:=Vx(t);
    PutPoint(t+t0,x(t),k);
  end;
end.

@volvo · 19.03.2017, 12:57

Joy, я бы сначала нашел координату, в которой точка была в момент времени t₀ = 0:
если известно, что x₂=2, и

$https://www.cyberforum.ru/cgi-bin/latex.cgi?v\left(t \right) = 2+\frac{20}{t^2+4}$

, то

$https://www.cyberforum.ru/cgi-bin/latex.cgi?x_0 = x_{start} - \sum_{i=1}^{t_{start}}v\left(t-i \right) \cdot \Delta t$

В реалиях этой задачи -

$https://www.cyberforum.ru/cgi-bin/latex.cgi?x_0 = x_1 - v\left(1 \right) \cdot 1 - v\left(0 \right) \cdot 1 = 2 - 6 - 7 = -11$

Вот и все. А теперь начинаем строить график, зная, как изменяется скорость, и зная, что в момент времени t₀ точка имела координату x₀ = (-11)

@Alextroy11 0 / 0 / 0 Регистрация: 18.03.2017 Сообщений: 26
		1
	Скорость при одномерном движении на Pascal 18.03.2017, 18:30. Показов 1594. Ответов 2 Метки нет (Все метки) Материальная точка движется прямолинейно вдоль оси OX со скоростью Vx(t). Построить график зависимости x=x(t) для промежутка времени [0,6], если в момент времени t1 точка имела координату х1. Vx(t)=2+20/(t^2+4); t1=2; x1=2. 0

@volvo Супер-модератор 32992 / 21298 / 8180 Регистрация: 22.10.2011 Сообщений: 36,593 Записей в блоге: 8
	19.03.2017, 12:57	3
	Сообщение было отмечено Joy как решение Решение Joy, я бы сначала нашел координату, в которой точка была в момент времени t₀ = 0: если известно, что x₂=2, и $https://www.cyberforum.ru/cgi-bin/latex.cgi?v\left(t \right) = 2+\frac{20}{t^2+4}$ , то $https://www.cyberforum.ru/cgi-bin/latex.cgi?x_0 = x_{start} - \sum_{i=1}^{t_{start}}v\left(t-i \right) \cdot \Delta t$ В реалиях этой задачи - $https://www.cyberforum.ru/cgi-bin/latex.cgi?x_0 = x_1 - v\left(1 \right) \cdot 1 - v\left(0 \right) \cdot 1 = 2 - 6 - 7 = -11$ Вот и все. А теперь начинаем строить график, зная, как изменяется скорость, и зная, что в момент времени t₀ точка имела координату x₀ = (-11) 1

Скорость при одномерном движении на Pascal

Решение