Напишите программу определения времени встречи двух автомобилей, если известно расстояние между двумя пунктами, откуда они вышли навстречу друг другу одновременно, а также их скорости.в паскале

Var
  s,v1,v2:integer;
  t:real;
begin
write('Введите расстояние между автомобилями (в км.): ');
readln(s);
write('Введите скорости автомобилей (в км/ч): ');
readln(v1,v2);
t:=s/(v1+v2);
writeln('Встретятся через ',t,' ч.');
end.