Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T (программа Паскаль)

var
V1, V2, T, S: real;

begin
write('V1 = ');
readln(V1); { <-- вводим скорость 1 автомобиля }
write('V2 = ');
readln(V2); { <-- вводим скорость 2 автомобиля }
write('S = ');
readln(S); { <-- вводим начальное расстояние между автомобилями }
write('T = ');
readln(T); { <-- вводим время сближения автомобилей }
S := abs(S - (V1 + V2) * T); { <== расстояние через T часов сближения }
writeln;
writeln(' S = ', S:0:3, ' км');
readln
end.