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)y= (√x+1 )+ 2/(x-4)
a) первое ограничение на √x - здесь х ≥ 0
б) второе ограничение на знаменатель (х-4) ≠ 0 - здесь х≠ 4
объединяем, получаем ООФ
{x ∈R: x ≥ 0; x≠4}
2)y= (√6-x) + 2/(x²-6x)

здесь ограничение только на знаменатель (x²-6x) = х(х-6)≠ 0
х ≠ 0 и х ≠ 6
{x ∈R: х ≠ 0; х ≠ 6}
3)y= (√x-2) - x+8/x-5
аналогично первому примеру ограничения на подкоренное выражение х ≥ 0 и на знаменатель (х-5) ≠ 0 ⇒ х ≠ 5
{x ∈R: x ≥ 0; x≠5}
примечание:
если бы скобки были расставлены иначе, например,
не так 1) y= (√x+1 )+ 2/(x-4)
а вот так 1)y= √(x+1 )+ 2/(x-4),
то область определения была бы другая
вот такая {x ∈R: x ≥ -1; x≠4}