Помогите пожалуйста с информатикой. Очень надо.

Question

В паскале сделать надо. Помогите пожалуйста, ребятки: *
Автомобиль ехал несколько часов со скоростью V1 км/час, затем несколько часов со скоростью V2 км/час. Значения времени и скорости вводятся с клавиатуры. Сколько км он проехал? Какова его средняя скорость?

Станислав Соколов · Accepted Answer

var
 t1,v1,t2,v2,s,v:real;
begin
 write('t1= ');
 readln(t1);
 write('v1= ');
 readln(v1);
 write('t2= ');
 readln(t2);
 write('v2= ');
 readln(v2);
 s:=v1*t1+v2*t2;
 writeln('s= ',s:8:2);
 v:=s/(t1+t2);
 writeln('v= ',v:8:2);
 readln;
end.