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.
не могу сказать верно или нет, так как не проверял а просто написал в блокнотике
1.
Пусть Анар соберет помидоры за х минут, тогда
за 1 минуту он соберет 1/х часть помидоров
за 1 минуту Жанар соберет 1/18 часть помидоров
за 1 минуту они вдвоем соберут 1/15 часть помидоров
1/х + 1/18 = 1/15
270+15х=18х
3х=270
х=90.
ответ: за 90 минут.
2.
Пусть вторая группа выполнит работу за х часов, тогда
за 1 час она выполнит 1/х часть работы
первая группа за 1 час выполнит 1/15 часть работы
две группы вместе за 1 час выполнят 1/6 часть работы
1/х + 1/15 = 1/6
30+2х=5х
3х=30
х=10
ответ: за 10 часов
3.
Пусть Арай выполнит заказ за х часов, тогда
за 1 час она выполнит 1/х часть заказа
за 1 час Сауле выполнит 1/12 часть заказа
за 1 час они выполнят 1/8 часть заказа
1/х + 1/12 = 1/8
24+2х=3х
х=24.
ответ: за 24 часа