Pagini recente » Cod sursa (job #1792270) | Istoria paginii runda/matrice_ | Cod sursa (job #445030) | Cod sursa (job #2765139) | Cod sursa (job #1419694)
program euclidextins;
var
a,b,c,i,x,y:longint;
f,g:text;
d:integer;
n:byte;
function cmmdc(a,b:longint;var x,y:longint):integer;
var
x0,y0:longint;
begin
if b=0 then
begin
x:=1;
y:=0;
cmmdc:=a;
end
else
begin
cmmdc:=cmmdc(b,a mod b,x0,y0);
x:=y0;
y:=x0-(a div b)*y0;
end;
end;
begin
assign(f,'euclid3.in');
reset(f);
assign(g,'euclid3.out');
rewrite(g);
read(f,n);
for i:=1 to n do
begin
read(f,a,b,c);
d:=cmmdc(a,b,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.