Begin37. Скорость первого автомобиля V_1 км/ч, второго — V_2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили первоначально движутся навстречу друг другу. Данное расстояние равно модулю разности начального расстояния и общего пути, проделанного автомобилями; общий путь = время * суммарная скорость.
Решение:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
program Begin37; var V1,V2,S,T,SResult: Real; begin Write('Введите скорость первого автомобился: '); Readln(V1); Write('Введите скорость второго автомобиля: '); Readln(V2); Write('Введите расстояние между автомобилями S : '); Readln(S); Write('Введите прошедшее время: '); Readln(T); SResult:=Abs(S-(V1*t+V2*t)); Writeln('Расстояние между автомабилями: ',SResult); end. |
Другие задачи из раздела Begin можно посмотреть здесь.
Комментарии: