Учесть, что при движении против течения скорость лодки уменьшается на величину скорости течения.
Program Begin35;
Var
V, U, T1, T2, S: Real;
Begin
WriteLn('Введите V,U,T1 и T2');
ReadLn(V, U, T1, T2);
S := T1 * V + T2 * (V - U);
WriteLn('Путь S, пройденный лодкой равен ', S);
ReadLn;
End.