Составить программу для вычисления пути, пройденного лодкой, если её скорость в стоячей...

Question

Составить программу для вычисления пути, пройденного лодкой, если её скорость в стоячей воде V км./ч, скорость течения реки и км./ч, время движения по озеру t1ч а против течения реки - t2 ч.

Answer 1

//Pascal ABC.NET v3.1 сборка 1172

Var
 v,vr,t1,t2,s:real;
begin
 read(v,vr,t1,t2);
 s:=v*t1;
 writeln('По озеру:',s);
 s:=(v-vr)*t2;
 writeln('Против реки:',s);
end.

Пример ввода:
12
2
100
200
Пример вывода:
По озеру:1200
Против реки:2000