var
v1, v2, s, t, s1: integer;
begin
write ('Введите v1, v2, s, t');
readln (v1, v2, s, t);
s1:=s+t*(v1+v2);
write ('Расстояние между автомобилями =', s1);
end.
Объяснение:
вОТ
var
v1, v2, s, t, s1: integer;
begin
write ('Введите v1, v2, s, t');
readln (v1, v2, s, t);
s1:=s+t*(v1+v2);
write ('Расстояние между автомобилями =', s1);
end.
Объяснение:
вОТ