Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили удаляются друг от друга — Pascal(Паскаль)

Program Begin36;

Var
  V1, V2, S, Summ, T: Real;

Begin
  WriteLn('Введите V1,V2,S и T');
  ReadLn(V1, V2, T);
  Summ := S + T * (V1 + V2);
  WriteLn('Расстояние равно ', Summ);
  ReadLn;

End.