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

Program avto2;
var S_obshyi, S_cherez_T, T, S, V1, V2: real;
begin
    write('Введите скорость первого автомобиля: ');
    readln(V1);
    write('Введите скорость второго автомобиля: ');
    readln(V2);
    write('Введите первоначальное расстояние: ');
    readln(S);
    write('Введите T: ');
    readln(T);
    S_obshyi:=T*(V1+V2);
    S_cherez_T:=abs(S-S_obshyi);
    write('Расстояние между автомобилями через ', T,' ч = ', S_cherez_T);
end.