Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили удаляются друг от друга
Категория: Delphi/Pascal
2011-11-20 23:10:07
Данное расстояние равно сумме начального расстояния и общего пути, проделанного автомобилями; общий путь = время * суммарная скорость
code: #pascal
Program Begin36; Var V1,V2,S,Summ,T:Real; Begin WriteLn('Введите V1,V2,S и T'); ReadLn(V1,V2,T); Summ:=S + T*(V1 + V2); WriteLn('Расстояние равно ',Summ); ReadLn; End.
автор: Sklyarov Sergej a.k.a. S9
Поделиться: