Грузовой автомобиль выехал из одного города в другой со скоростью V1 км/ч. Через t ч в этом же направлении выехал легковой автомобиль со скоростью V2 км/ч. Определить, догонит ли легковой автомобиль грузовой через t1 ч после своего выезда

Грузовой автомобиль выехал из одного города в другой со скоростью V1 км/ч. Через t ч в этом же направлении выехал легковой автомобиль со скоростью V2 км/ч. Определить, догонит ли легковой автомобиль грузовой через t1 ч после своего выезда.

var
s1, s2, v1,v2,t1,t: integer;
begin
  writeln ('Введите скорость грузового автомобиля');
  readln (v1);
  writeln ('Введите скорость легкового автомобиля');
  readln (v2);
  writeln ('Введите время t1');
  readln (t1);
  writeln ('Введите время t');
  readln (t);
  s1:=v1*(t1+t);
  s2:=v2*t;
  If s2>=s1 then
    writeln ('Догонит')
  else
  writeln ('Не догонит');
end

var

s1, s2, v1,v2,t1,t: integer;

begin

writeln ('Введите скорость грузового автомобиля');

readln (v1);

writeln ('Введите скорость легкового автомобиля');

readln (v2);

writeln ('Введите время t1');

readln (t1);

writeln ('Введите время t');

readln (t);

s1:=v1*(t1+t);

s2:=v2*t;

If s2>=s1 then

writeln ('Догонит')

else

writeln ('Не догонит');

end

Будем благодарны, если вы поделитесь данной записью со своими друзьями в социальных сетях, оставите отзыв и посмотрите другие материалы на нашем сайте.

Похожие записи:

Добавить комментарий Отменить ответ