利用的是公式：φ(x)=x(1-1/p1)(1-1/p2)(1-1/p3)(1-1/p4)…..(1-1/pn),其中p1, p2……pn為x的所有質因數，x是不為0的整數。
φ(1)=1（唯一和1
互質的數(小於等於1)就是1本身）。 (注意：每種質因數只乙個。比如12=2*2*3那麼φ（12）=12*（1-1/2）*(1-1/3)=4）。
program pro;
var oula:array[0..10000]of longint;
n,i,j:longint;
procedure makeoula(x:longint);
var ii,jj:longint;
begin
for ii:=1 to x do oula[ii]:=ii;
for ii:=2 to x do
begin
if oula[ii]=ii then
begin
jj:=ii;
while jj<=x do
begin
oula[jj]:=oula[jj]div ii*(ii-1);
inc(jj,ii);
end;
end;
end;
for ii:=1 to x do writeln(ii,' ',oula[ii]);
end;
begin
assign(input,'oula.in'); reset(input);
assign(output,'oula.out'); rewrite(output);
readln(n);
makeoula(n);
close(input);
close(output);
end.
尤拉函式 尤拉定理
尤拉函式 對正整數 n，尤拉函式 是小於等於 n的數中與 n互質的數的數目 此函式以其首名研究者尤拉命名 euler so totientfunction 它又稱為 euler stotient function 函式 尤拉商數等。例如 8 4，因為 1,3,5,7均和8 互質。注 n為1時尤拉函式...
尤拉函式 尤拉定理
尤拉函式 設 n 為正整數，則 1，2，n 中與 n 互素的整數的個數計作 n 叫做尤拉函式。設 p 是素數，p p 1設 p 是素數，pa pa p a 1 設 p,q 是不同的素數，n q p，n p q 即 n p 1 q 1 設 m,n 是兩個正整數，且 m,n 1，若 n m n，n m ...
尤拉函式尤拉篩
尤拉函式求小於等於n與n互質的數的個數 複習時發現這個知識點竟然沒有整理 n為素數即為n 1 除了其本身 n為素數的倍數 ola sushu j i ola i sushu j else ola sushu j i ola i sushu j 1 include include include in...