输入一个正整数N，把它分解成质因子相乘的形式。如：36=1×2×2×3×3；

来源：百度知道 编辑：UC知道 时间：2024/06/05 00:18:43
我是个新手，今天布置的这个程序我编不出来，哪位好人帮帮我啊。 谢了。 注明：要用pascal来编写。

QQ:594678583

program olive;
var
i,j,m,n:integer;
begin
readln(n);
write(n,\'=\',1);
m:=n;
for i:=2 to n do
begin
while((m mod i)=0) do
begin
write(\'*\',i);
m:=m mod i;
end;
end;
end.

递归

可以先建一个质数表，再统计各质数的个数。这个是最容易实现的方法，效率有点儿低。