Два бегуна тренируются на кольцевой дорожке легкоатлетического стадиона длиной 400 метров. Они начинают бег из одной точки и бегают по заданиям тренера указанное число минут с указанной скоростью (под скоростью понимается количество метров, которое спортсмен пробегает по дорожке за минуту). Требуется определить расстояние, на котором окажутся бегуны друг от друга в конце тренировки (расстоянием называется длина более короткой части дуги дорожки между спортсменами).

Var
  t,v1,v2,x:integer;
begin
write(Длительность тренировки в мин.: );
readln(t);
write(Скорость 1-го и 2-го (в м/мин): );
readln(v1,v2);
x:=abs(v1-v2)*t;
x:=x mod 400;
if x>200 then x:=400-x;
writeln(Расстояние между ними в конце тренировки: ,x)
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.