Cod sursa(job #431892)
| Utilizator |  Zabolai Zsolt zsee |
Data | 1 aprilie 2010 16:18:03 |
|---|---|---|---|
| Problema | Invers modular | Scor | 30 |
| Compilator | fpc | Status | done |
| Runda | Arhiva educationala | Marime | 0.28 kb |
program invmod;
var a,n:longint;
x:qword;
ki,be:text;
begin
assign(be,'inversmodular.in');
reset(be);
assign(ki,'inversmodular.out');
rewrite(ki);
readln(be,a,n);
x:=n;
while (x+1) mod a <> 0 do
x:=x + n;
writeln(ki,(x+1) div a);
close(ki);
end.
