Автомобиль ехал t1 часов со скоростью v1 и t2 часов со скоростью v2. найдите среднюю скорость автомобиля

Question

Информатика

Фросюшка

8 октября, 16:39

Автомобиль ехал t1 часов со скоростью v1 и t2 часов со скоростью v2. найдите среднюю скорость автомобиля

+2

Ответы (1)

Знаете ответ на вопрос?

Евлампия · Answer 1

Var

v1, v2, t1, t2, S1, S2:real;

Begin

Write ('v1 = ') ; ReadLn (v1) ;

Write ('t1 = ') ; ReadLn (t1) ;

Write ('v2 = ') ; ReadLn (v2) ;

Write ('t2 = ') ; ReadLn (t2) ;

S1:=v1*t1;

S2:=v2*t2;

WriteLn ('Vср = ', (S1+S2) / (t1+t2))

End.