Pagini recente » Cod sursa (job #1215311) | Cod sursa (job #1091399) | Cod sursa (job #2815717) | Cod sursa (job #3162350) | Cod sursa (job #144086)
Cod sursa(job #144086)
program asd;
var a,b,c,t,i,x,y : longint;
q,j : shortint;
ok : boolean;
f,g : text;
begin
assign(f,'euclid3.in');
reset(f);
assign(g,'euclid3.out');
rewrite(g);
readln(f,q);
for j := 1 to q do begin
readln(f,a,b,c);
x := a;
y := b;
ok := true;
while x <> 1 do begin
while y <> 0 do begin
t := y;
y := x mod y;
x := t;
end;
writeln(x);
if c mod x <> 0 then begin
ok := false;
break;
end;
c := c div x;
a := a div x;
b := b div x;
x := a;
y := b;
end;
if ok then begin
for i := 1 to c do begin
x := i;
y := (c-a*x) div b;
if a*x+b*y=c then break;
end;
writeln(g,x,' ',y);
end
else
writeln(g,0,' ',0);
end;
close(f);
close(g);
end.