var a,b:integer;beginreadln(a,b);if a mod b = 0 then writeln('a - делитель b');if b mod a = 0 then writeln('b - делитель a');end.