Page 33 - 4395
P. 33

ДОДАТОК Б

                            MatLab-АЛГОРИТМ ОБЧИСЛЕННЯ ОБЕРНЕНОГО
                                                         ЗА МОДУЛЕМ


                        >> dbtype invers

                        1     %M-file invers_2

                        2     % Calculation A^(-1) mod B
                        3     % Inputs: number A, module B.
                        4     % Output: invA = A^(-1) mod B
                        5     %  invA-string

                        6
                        7     echo off
                        8

                        9      A=1229;
                        10    As=dec2bin(A);
                        11    B=4060;

                        12    [G,C]=gcd(A,B);
                        13    invA=mod(C,B);
                        14    invAs=dec2bin(invA);

                        15    disp(sprintf('Number A = %d',A))
                        16    disp(sprintf('Module B = %d',B))
                        17        disp(sprintf('Inverse  number  invA  =  A^(-1)  mod  B  =
                 %d',invA))

                        18    disp(sprintf('invA-string: %s',invAs))
                        19    disp(sprintf('A-string:    %s',As))
                        >>




























                                                              33
   28   29   30   31   32   33   34   35   36   37   38