int
        a, b, c, g, // коэффициенты диофантова уравнения, и g=gcd(a,b)
        x0, y0, // одно из решений диофантова уравнения
        x1, x2, // заданный отрезок
        mx, my; // искомое решение с наименьшим x >= x1
int cnt = (x1 - x0) / (b / g);
if (x0 + cnt * (b / g) < x1)
        ++cnt;
mx = x0 + cnt * (b / g);
my = y0 - cnt * (a / g);

VAR
 a,b,c,r:LongInt;

Function Gcd(g1,g2:LongInt):LongInt;
{Search for the Greatest Common Divisor}
var m,gc:LongInt;
begin
 If g2>g1 then
  begin
   m:=g1;
   g1:=g2;
   g2:=m;
  end;
 gc:=g2+1;
 Repeat
  Dec(gc);
 Until ((g1 mod gc)=0) and ((g2 mod gc)=0);
 Gcd:=gc;
end;

BEGIN
 Write('a= ');
 Readln(a);
 Write('b= ');
 Readln(b);
 Write('c= ');
 Readln(c);
 If (c mod Gcd(a,b))=0 then r:=-1 else r:=0;
 Writeln('Result: ',r);
 Readln;
END.

VAR
 a,b,c,r:LongInt;
 f:Text;

Function Gcd(g1,g2:LongInt):LongInt;
{Search for the Greatest Common Divisor}
var m,gc:LongInt;
begin
 If g2>g1 then
  begin
   m:=g1;
   g1:=g2;
   g2:=m;
  end;
 gc:=g2+1;
 Repeat
  Dec(gc);
 Until ((g1 mod gc)=0) and ((g2 mod gc)=0);
 Gcd:=gc;
end;

BEGIN
 Assign(f,'D:\Inp.txt');
 Reset(f);
 Read(f,a,b,c);
 Close(f);
 Assign(f,'D:\Outp.txt');
 Rewrite(f);
 If (c mod Gcd(a,b))=0 then r:=-1 else r:=0;
 Write(f,r);
 Close(f);
END.