По информатике на языке паскаль. 9 класс. автомобиль двигался со скоростью v1- количество времени t1, со скоростью v2 количество времени t2, найдите среднюю скорость

Var v1,t1,v2,t2,sr:real;
begin
write('Введите V1, t1: '); readln(v1,t1);
write('Введите V2, t2: '); readln(v2,t2);
sr:=(v1*t1+v2*t2)/(t1+t2);
writeln('Средняя скорость = ',sr);
end.

Пример:
Введите V1, t1: 60 1
Введите V2, t2: 90 2
Средняя скорость = 80