найти скорости поездов

[3Doleg]

пассажирский поезд в течение т1 часа проходит на 10 км. больше, чем товарный в течение т2 часа. скорость товарного поезда на 20км / ч меньше скорости пассажирского. найти скорости поездов

где то здесь есть ошибка..
program a5;
uses crt;
const t1=1; t2=2;
var wp,wt,n:real;
begin
clrscr;
writeln('vvedite koluchestvo kulometrov- ');
readln(n);
wp:=((n/t1)+10)+20;
wt:=((n/(t2/2))-10)+20;
writeln('skorost pasachurskogo- ', wp:4:1);
writeln('scorost tovarnogo- ', wt:4:1);
readkey;
end.

Буду благодарен)
p.s.:turbo pascal

[kventin_zhuk]

Сообщение от 3Doleg

пассажирский поезд в течение т1 часа проходит на 10 км. больше, чем товарный в течение т2 часа. скорость товарного поезда на 20км / ч меньше скорости пассажирского. найти скорости поездов

где то здесь есть ошибка..
program a5;
uses crt;
const t1=1; t2=2;
var wp,wt,n:real;
begin
clrscr;
writeln('vvedite koluchestvo kulometrov- ');
readln(n);
wp:=((n/t1)+10)+20;
wt:=((n/(t2/2))-10)+20;
writeln('skorost pasachurskogo- ', wp:4:1);
writeln('scorost tovarnogo- ', wt:4:1);
readkey;
end.

Буду благодарен)
p.s.:turbo pascal

program a5;
uses crt;
const t1=1; t2=2;
var
  wp,wt,n,du,s1,ds:real;
begin
clrscr;
du := 20.0;// разность скоростей
ds := 10.0; // разность путей
s1 := ( 2 * du * t1-ds);
wp:=(((s1)/t1));
wt:=((s1 - ds)/t2);
writeln('skorost pasachurskogo- ', wp:4:1);
writeln('scorost tovarnogo- ', wt:4:1);
readkey;
end.

На будущее: Скорость равна путь/время. Судя из этой твоей формулы (wp:=((n/t1)+10)+20; ) путь равен (скорость/ время) + путь + скорость. Что есть очень неправильно.

В этой программе незачем спрашивать сколько километров прошли поезда, т.к тебя жёстко заданы временные границы(1 и 2 часа). В коде выше задаешь разность скоростей и разность путей - получаешь скорости. программа будет работать правильно только если T2 = T1 * 2, для другого случая нужно новую формулу выводить)

[Abstraction]

Если t1=t2=1/2, задачу нельзя решить (подойдёт любая пара скоростей, отличающихся на 20 км/ч).
Если t1=t2<>1/2, задачу нельзя решить, условие внутренне противоречиво.
Если t1<>t2, скорость пассажирского поезда - (10-20*t2)/(t1-t2), товарного - (10-20*t1)/(t1-t2).