Скорость лодки в стоячей воде V км/ч, скорость течения реки U км/ч. Определить путь S, пройденный лодкой (путь = время * скорость) — Pascal(Паскаль)

Учесть, что при движении против течения скорость лодки уменьшается на величину скорости течения.

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.

Leave a Comment

6 + 4 =