Дано два числа. если их сумма кратна 5,прибивать 1,иначе вычесть 2

путь по озеру равен   v * t1

скорость при движении против течения равна  v - u

путь по реке равен  (v - u) * t2

общий путь, пройденный лодкой  s = v * t1 + (v - u) * t2

program mss; uses crt; var v,m,h,r: real; beginclrscr; writeln('введите радиус'); readln(r); writeln('введите высоту'); readln(h); v: = 3.14*sqr(r)*h; m: = 1200*v; writeln('    ',m: 2: 2,' кг'); readln; end.