Автомобиль на каждом из пяти одинаковых по длине участках дороги шел с известной средней скоростью. Составьте алгоритм и программу для определения средней скорости на всем пути.

Question

Информатика

Андроника

14 октября, 07:24

Автомобиль на каждом из пяти одинаковых по длине участках дороги шел с известной средней скоростью. Составьте алгоритм и программу для определения средней скорости на всем пути.

+4

Ответы (1)

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

Нилыч · Answer 1

Program Avto;

Var

v1, v2, v3, v4, v5: Real;

vSred: Real;

Begin

Write ('введите скорости на 5 участках ') ;

ReadLn (v1, v2, v3, v4, v5) ;

vSred : = 5 / (1/v1 + 1/v2 + 1/v3 + 1/v4 + 1/v5) ;

WriteLn ('средняя скорость = ', vSred) ;

ReadLn;

End.