Найти произведение значений двух переменных и вывести на экран

Если на pascal, то: program qq;   var a,b: integer; begin   write('введите значение 1 переменной:   ');   read(a);   write('введите значение 2 переменной:   ');   read(b);   write('произведение двух переменных  ',a,'  и  ',b,'  равно:   ',a*b); end.

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

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

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

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