Длина московской кольцевой автомобильной дороги —109 километров. байкер вася стартует с нулевого километра мкад и едет со скоростью vкилометров в час. на какой отметке он остановится через t часов? программа получает на вход значения v и t. если v> 0, то вася движется в положительном направлении по мкад, если же значение v< 0, то в отрицательном.программа должна вывести целое число от 0 до 108 — номер отметки, на которой остановится вася. на паскале

Const
  L = 109;

var
  v, t, s: real;
  n: integer;

begin
  Write('Введите скорость Васи, км/ч: ');
  Readln(v);
  Write('Введите время в пути, ч: ');
  Readln(t);
  s := abs(v) * t;
  n := trunc(s);
  if s > n then n := n + 1;
  n := n mod L;
  if v > 0 then Writeln('Вася остановился на ', n, ' км.')
  else Writeln('Вася остановился на ', L - n - 1, ' км.')
end.

Тестовое решение:

Введите скорость Васи, км/ч: 85.4
Введите время в пути, ч: 1.5
Вася остановился на 20 км.