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

//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. пример ввода: 122100200пример вывода: по озеру: 1200против реки: 2000

program zadacha;

uses crt;

var otvet: real;

begin

otvet: = ((4785**45*45))/50;

writeln(otvet: 5: 5);

readkey;

end.

program p;

vara,b,c,i,j,n : integer;

beginwriteln('введите три числа'); readln(a,b,c);

if a> b then if a> c then writeln(a,c,b) else writeln(c,a,b) else if c> b then writeln(a,b,c) else writeln(b,c,a);  

readln; end.