输入一个正整数n,将n分解成质因数幂的乘积形式.例如:36=22*32 用pascal解答

问题描述:

输入一个正整数n,将n分解成质因数幂的乘积形式.例如:36=22*32 用pascal解答

program zk;vari,j,a,b,c,k,n:longint;beginreadln(n);i:=1;repeatif i1 then write('*');inc(i);k:=0;while n mod i=0 do begin inc(k); n:=n div i; end;write(i...