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) 3y=2x+4
y=(2x+4)/3=2x/3+4/3
2) 6y=ax+7
y=(ax+7)/6=ax/6+7/6
Чтобы прямые были параллельны, необходимо, чтобы коэффициенты наклона были равны.
2х/3=ах/6
4х=ах
а=4
ответ: а=4
Пошаговое объяснение: