Pagini recente » Cod sursa (job #322854) | Cod sursa (job #590559)
Cod sursa(job #590559)
var f,g:text;
a,b,c,d,x,y:int64;
i,n:longint;
Procedure cmmdc(a,b:int64; var d,x,y:int64);
var x0,y0:int64;
begin
if b = 0 then begin
d:=a;
x:=1;
y:=0;
end
else begin
cmmdc(b,a mod b,d,x0,y0);
x:=x0;
y:=x0-(a div b)*y0;
end;
end;
Begin
assign(f,'euclid3.in');
assign(g,'euclid3.out');
reset(f);
rewrite(g);
readln(f,n);
for i:=1 to n do begin
readln(f,a,b,c);
cmmdc(a,b,d,x,y);
if c mod d <> 0 then writeln(g,'0 0')
else writeln(g,x*(c div d),' ',y*(c div d));
end;
close(f);
close(g);
End.