Pagini recente » Cod sursa (job #3156983) | Cod sursa (job #3294677) | Cod sursa (job #986944) | Cod sursa (job #1359570) | Cod sursa (job #238098)
Cod sursa(job #238098)
var t, a, b, c, d:integer;
f:text
function cmmdc(var a,b,d,x,y:longint):longint;
begin
if b=o then
begin
d:=a;
x:=1;
y:=0;
end
else
begin
euclid(b,a mod b, d, x0, y0);
x:=y0;
y:=xo-(a/b)*y0;
end;
begin
assign(f,'euclid3.in');reset(f);
assign(g,'euclid3.out');rewrite(f);
readln(f,t);
for i:=1 to t do
begin
read(f,a,b,c);
cmmdc(a,b,x,y);
if c mod d=0 then writeln(g,x*(c div d),' ',y*(c div d))
else writeln(g,0,' ',0);
end;
close(f);
close(g);
end.