program lodka1;
var S, V, U, T1, T2: real;
begin
write('Введите скорость лодки: ');
read(V);
write('Введите скорость течения реки: ');
read(U);
write('Введите время движения по озеру: ');
read(T1);
write('Введите время движения по реке: ');
read(T2);
S := T2 * (V - U) + T1 * V;
writeln('Путь, пройденный лодкой равен ', S:5:2);
end.