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

Question

Информатика

Ларя

4 февраля, 03:45

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

+1

Ответы (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.