Cod sursa(job #550883)

Utilizator ion_calimanUAIC Ion Caliman ion_caliman Data 10 martie 2011 00:06:57
Problema Invers modular Scor 0
Compilator fpc Status done
Runda Arhiva educationala Marime 0.29 kb
Raporteaza aceasta sursa 
var     i,a,n:longint;
        f1,f2:text;

begin
  assign(f1,'disjoint.in');
  reset(f1);
  assign(f2,'disjoint.out');
  rewrite(f2);
  readln(f1,a,n);

  for i:=1 to n-1 do
    if a*i mod n=1 then
      begin
        writeln(f2,i);
        close(f2);
        halt;
      end;
end.