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.
не могу сказать верно или нет, так как не проверял а просто написал в блокнотике
Пошаговое объяснение:
4/7(2,1m-3 1/4)-3,6(5/9n-0,5n)=
=4/7(2 1/10m-3 1/4)-3 6/10(5/9n-5/10n)=
=4/7(21/10m-13/4)-3 3/5(5/9n-1/2n)=
=6/5m-13/7-18/5((10-9)/18n)=
=6/5×m-13/7-18/5(1/18×n)=
=6/5×m-13/7-1/5×n=1,2m-0,2n-13/7=
=1,2m-0,2n-1 6/7