Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T (программа Паскаль)
Вопрос посетителя
Скорость первого автомобиля V1 км/ч, второго — V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если автомобили первоначально движутся навстречу друг другу. Данное расстояние равно модулю разности начального расстояния и общего пути, проделанного автомобилями; общий путь = время · суммарная скорость.
Ответ эксперта
var
V1, V2, T, S: real;
begin
write(‘V1 = ‘);
readln(V1); { <-- вводим скорость 1 автомобиля }
write(‘V2 = ‘);
readln(V2); { <-- вводим скорость 2 автомобиля }
write(‘S = ‘);
readln(S); { <-- вводим начальное расстояние между автомобилями }
write(‘T = ‘);
readln(T); { <-- вводим время сближения автомобилей }
S := abs(S — (V1 + V2) * T); { <== расстояние через T часов сближения }
writeln;
writeln(‘ S = ‘, S:0:3, ‘ км’);
readln
end.
