Разобраться в задачке. Определить вектор скорости, вектор ускорения материальной точки?

[Mat Bourn]

Всем доброго! Помогите разобраться в задачке.
Осталось мне решить ее одну по алгоритмизации. Так у меня с математика трудности, я на ней и остановился.

Определить вектор скорости, вектор ускорения материальной точки, если она движется по закону

где А = 2,0 м, В =3,0 м.

  var vT, aT: real;
        A, B, t: real;

begin
  try

    A:= 2.0;
    B:= 3.0;
    vT:= 5 * A * cos(5 * t) - 5 * B * sin(10 * t);
    aT:= -25 * A * sin(5 * t) - 50 * B * cos(10 * t);

    writeln(vT);
    write(aT);
    Readln;

Я ходил к знакомому учителю по математике. Мы с ним пришли к следующему:
Что мне не понятно я подчеркнул красным цветом.

[Pavia]

В первом уравнение потерялся единичный вектор i


t - это просто переменная, физики обычно её ассоциируют с временем.
Кто-то её в условии забыл вписать из-за чего ваше условие некорректно. Но программистам всегда приходится додумывать и тут просто написать функцию для вычисления вектора от времени. А потом в коде сделать ввод этой переменной t. А далее подставить её значение в функцию, что-бы получить результат.


type
TVector=record x,y:Real end;

[Mat Bourn]

Спасибо за объяснение.

Исправил ошибки:

var vT, aT: real;
        A, B, t: real;

begin
  try
    A:= 2.0;
    B:= 3.0;
    write('t  = ');
    readln(t);

    vT:= 5 * A * cos(5 * t) - 5 * B * sin(10 * t);
    aT:= -25 * A * sin(5 * t) - 50 * B * cos(10 * t);

    writeln(vT);
    write(aT);
    Readln;

[Pavia]

type
  TVector=record 
    x,y:Real 
   end;
var vT, aT: TVector;
        A, B, t: real;

begin
    A:= 2.0;
    B:= 3.0;
    write('t  = ');
    readln(t);

    vT.x:= 5 * A * cos(5 * t);
    vT.y:= - 5 * B * sin(10 * t);
    aT.x:= -25 * A * sin(5 * t);
    aT.y:= - 50 * B * cos(10 * t);

    writeln('[',vT.x:4:2,' ',vT.y:4:2,']');
    writeln('[',aT.x:4:2,' ',aT.y:4:2,']');
    Readln;
 end.

[Mat Bourn]

Pavia, спасибо за помощь!