|
%I #12 Aug 16 2019 14:03:22
%S 7,2,6,1,5,9,6,2,8,3,7,8,8,7,9,3,6,0,9,3,4,8,1,3,8,2,7,6,2,0,5,7,4,8,
%T 4,1,7,6,4,5,3,5,1,1,5,1,0,9,6,1,7,8,6,2,0,6,2,7,7,9,5,1,7,1,3,6,0,6,
%U 5,4,8,9,1,5,3,5,9,7,2,9,3,1,4,8,3,5,8,7,3,1,0,5,5,9,0,0,7,0,8,6
%N 10-adic integer x such that x^7 = 3.
%H Seiichi Manyama, <a href="/A225444/b225444.txt">Table of n, a(n) for n = 0..10000</a>
%e 7^7 == 3 (mod 10).
%e 27^7 == 3 (mod 10^2).
%e 627^7 == 3 (mod 10^3).
%e 1627^7 == 3 (mod 10^4).
%e 51627^7 == 3 (mod 10^5).
%e 951627^7 == 3 (mod 10^6).
%o (PARI) n=0;for(i=1,100,m=3;for(x=0,9,if(((n+(x*10^(i-1)))^7)%(10^i)==m,n=n+(x*10^(i-1));print1(x", ");break)))
%o (PARI) N=100; Vecrev(digits(lift(chinese(Mod((3+O(2^N))^(1/7), 2^N), Mod((3+O(5^N))^(1/7), 5^N)))), N) \\ _Seiichi Manyama_, Aug 06 2019
%K nonn,base
%O 0,1
%A _Aswini Vaidyanathan_, May 11 2013
|
