正整数n的质因数分解(2

来源:学生作业帮助网 编辑:六六作业网 时间:2024/05/22 20:11:33
正整数n的质因数分解(2正整数n的质因数分解(2正整数n的质因数分解(2数据n可以用longint储存,就是普通的穷举题啦~~~fori:=2totrunc(sqrt(n))dobeginwhilen

正整数n的质因数分解(2
正整数n的质因数分解(2

正整数n的质因数分解(2
数据n可以用longint储存,就是普通的穷举题啦~~~
for i:=2 to trunc(sqrt(n)) do
begin
while n mod i=0 do
begin
n:=n div i;
记录或输出i;
end;
end;
因为是从小到大,不用担心重复神马的啦~~~~

for i:=2 to trunc(sqrt(n)) do
while n<>0 do begin
a[i]:=n mod i;
n:=n div i;
end;