Cod sursa(job #143555)
| Utilizator |  Diaconeasa Andrei AndreiD |
Data | 26 februarie 2008 17:36:34 |
|---|---|---|---|
| Problema | Algoritmul lui Euclid extins | Scor | 0 |
| Compilator | fpc | Status | done |
| Runda | Arhiva educationala | Marime | 0.34 kb |
var a,b,c,i,n,y,x:longint;
f,g:text;
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);
if a+b>c then writeln(g,'0',' ','0')
else begin
y:=(c-a*b) div 5-1;
x:=(c-b*y) div a;
writeln(g,x,' ',y);
end;
end;
close(f);
close(g);
end.
