1)4 11/36
2)2 7/24
3)1 7/8
4)2 4/5
5)7/18
6)10
7)30
8)1
9)7 1/2
10)7/8
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)
13
18
+2
7
12
=
1 · 18 + 13
18
+
2 · 12 + 7
12
=
31
18
+
31
12
=
2 · 31
2 · 18
+
3 · 31
3 · 12
=
62
36
+
93
36
=
62 + 93
36
=
155
36
=4
11
36
2)
3
11
24
−1
1
6
=
3 · 24 + 11
24
−
1 · 6 + 1
6
=
83
24
−
7
6
=
1 · 83
1 · 24
−
4 · 7
4 · 6
=
83
24
−
28
24
=
83 − 28
24
=
55
24
=2
7
24
≈