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

program avt;
var V1, V2, S, T, S1: real; 
begin
    write('Введите скорость первого автомобиля: ');
    readln(V1); write('Введите скорость второго автомобиля: ');
    readln(V2); write('Введите время: ');
    readln(T);
    write('Введите расстояние между автомобилями: ');
    readln(S); S1 := (V1 + V2) * T + S;
    writeln('Через ', T, 'ч. расстояние ', S1, ' км.');
end.