На числовом луче отметьте все делители и четыре первых кратных данного числа: а)3 ; б)4 ; в)5 .25 .

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;0). смотри скан. 
Параллельный перенос т.А в т.С одновременно с переносом т.В в т.А1 возможен. потому что треугольник АВС прямоугольный и ранобедренный, и фигура АВСА1-квадрат.  
Параллельный перенос т.А в т.С одновременно с переносом т.В в т.А1 возможен относительно прямой а, смотри скан. Уравнение для прямой а может быть представлено формулой у=-х+3