'ここから先は自分が書いたコードを書きました。汚いのであしからず。 def primes(n) var i,r$ if n<4 then return format$("%d",n) 'sqr(4)がforが働く最小値だから for i=2 to sqr(n)'えらとすてねすのふるい if n mod i == 0 then while n mod i == 0 '割りきれた inc cx n=n/i wend if cx>=2 then r$=r$+format$("*%d^%d",i,cx) else r$=r$+format$("*%d",i) endif next var junk$=shift(r$):return r$:end