Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Составить алгоритм на языке Паскаль решения задачи: найти среднюю скорость движения поезда, если Т1 час он двигался со скоростью V1, а Т2 часа - со скоростью V2

Ответ оставил Гость

Var t1, v1, t2, v2, s1, s2, s, t, v : real;
begin
  write(t1 = );
  read(t1);
  write(v1 = );
  read(v1);
  write(t2 = );
  read(t2);
  write(v1 = );
  read(v2);
  s1 := v1 * t1;
  s2 := v2 * t2;
  s := s1 + s2;
  t := t1 + t2;
  v := s / t;
  write(Cp.v = , v);
end.

Пример работы программы:
t1 = 2
v1 = 5
t2 = 3
v1 = 10
Cp.v = 8