Помогите написать программу на языке Pascal

Question

Помогите написать программу на языке Pascal

Пользователь удален Мастер (1358), закрыт 4 года назад

Cоставить программу для вычисления пути пройденного лодкой,если её скорость в стоячей воде V км/ч ,скорость течения реки,V1 км/ч,время движения по озеру T1 часов.,а против течения реки T2 часа

Дополнен 16 лет назад

лучшему 10 баллов

Answer 1

program abc;
uses crt;
var v,v1,t1,t2,s:longint;
begin
readln(v,v1,t1,t2);
s:=v*t1+(v-v1)*t2;
writeln(s);readln;
end.

Answer 2

чет въехать в условие не могу.. .
лодка шла по течению какое то время (t1), потом развернулась и шла против течения (t2), и нужно найти общее расстояние по формуле s=v*t1+v1*t2???
я правильно понял? если да, то писать 5 минут, если нет, объясни правильно!! !
p.s.: при чем здесь озеро, если лодка на реке?

Answer 3

C:
double s(double v, double v1, double t1, double t2) {
return v * t1 + (v-v1)*t2;
}

Answer 4

Из условия задачи видно, что лодка сначала шла по озеру, а потом пошла по впадающей в озеро реке.
Из этого следует, что расстояние нужно вычислять так:

s := v*t1 + max(0,v-v1)*t2;

так как если скорость течения больше скорости лодки, то лодка по реке не продвинется.