Sponsored links: Algebra eBooks
 

Related

totient

totient(151);

Calculate

totient

totient(21*10);

Calculate

totient

totient (50);

Calculate

totient

totient(510);

Calculate

totient

totient(19409079690)/...

Calculate

totient

totient(60491);

Calculate

totient

totient(17*11);

Calculate

totient

totient(319808);

Calculate

totient

totient(77880427);

Calculate

totient

Run Example
(%i1)p:1111111111111111111;
(%o1)                         1111111111111111111
(%i2) nod(a, b):=block(load("functs"),a*b/lcm(a,b));
                                                       a b
(%o2)            nod(a, b) := block(load("functs"), ---------)
                                                    lcm(a, b)
(%i3) primep(p);
(%o3)                                true
(%i4) a:432;
(%o4)                                 432
(%i5) nod(p-1,a);
(%o5)                                 18
(%i6) x:power_mod(a,(totient(p-1)-1),p-1);
(%o6)                         1005515546410608138
(%i7) m:789;
(%o7)                                 789
(%i8) 
Run Example
p:1111111111111111111;
(%o1)                         1111111111111111111
(%i2) nod(a, b):=block(load("functs"),a*b/lcm(a,b));
                                                       a b
(%o2)            nod(a, b) := block(load("functs"), ---------)
                                                    lcm(a, b)
(%i3) primep(p);
(%o3)                                true
(%i4) a:-42;
(%o4)                                - 42
(%i5) nod(p-1,a);
(%o5)                                 42
(%i6) x:power_mod(a,(totient(p-1)-1),p-1);
(%o6)                         269799277735785672
(%i7) m:789;
(%o7)                                 789
(%i8) 
Run Example
sum(totient(i*510510),i,1,10000);
(%o1)                            4548570531840
(%i2) 

Related Help

Help for Totient