Polynomial long division: Difference between revisions

Content added Content deleted
(add FreeBASIC)
m (→‎{{Header|FreeBASIC}}: - fix print error when the constant term is 1)
Line 1,251: Line 1,251:
end if
end if
if P(i)=0 then continue for
if P(i)=0 then continue for
if abs(P(i))<>1 then
if abs(P(i))<>1 or i=0 then
if outstr="" then
if outstr="" then
outstr = outstr + str((P(i)))
outstr = outstr + str((P(i)))