Пусть на дороге x пеньков, мистер Фокс сидит на каждом пеньке y мин, мистер Форд - 2y мин.
13:4 = 3,25 ч = 195 мин тратит Фокс на дорогу без учёта отдыха.
13:5 = 2,6 ч = 156 мин тратит Форд на дорогу без учёта отдыха.
xy мин тратит Фокс на отдых.
2xy мин тратит Форд на отдых.
xy+195 мин тратит Фокс на дорогу с отдыхом.
2xy+156 мин тратит Форд на дорогу с отдыхом.
Вышли и пришли они одновременно, то есть
xy+195 = 2xy+156
xy = 39
Так как x и y - целые числа, возможны следующие варианты:
x = 13, y = 3 или x = 3, y = 13.
То есть пеньков может быть 13 или 3.
var A,B, minA, maxA, minB, maxB, minn, maxx, t, t1, i:longint;
begin
readln(A); readln(B);
minA:=(A-1)*50+1; maxA:=A*50;
minB:=(B-1)*70+1; maxB:=B*70;
if (minA>maxB) or (minB>maxA) then writeln(-1) else
begin
if minA<minB then minn:=minB else minn:=minA;
if maxA>maxB then maxx:=maxB else maxx:=maxA;
t:=minn div 60;
t1:=maxx div 60;
if (minn mod 60)<>0 then inc(t);
if (maxx mod 60)<>0 then inc(t1);
for i:=t to t1 do
write(i, ' ');
writeln();
end;
end.
не могу сказать верно или нет, так как не проверял а просто написал в блокнотике