新しい多項式をつかう。 (%i1) factor((x^5+x^4+x^3+x^2+x+1)*x^13+x^6+x^5+x^4+x^3+x^2+x+1);
18 17 16
15 14 13
6 5 4
3 2 (%o1) x +
x + x + x + x +
x + x + x + x + x + x + x + 1
e4.batをつくった。 for x:2 while x<20 do( y:factor((x^5+x^4+x^3+x^2+x+1)*x^13+x^6+x^5+x^4+x^3+x^2+x+1), print(" x=",x), print("factor(x)=",y) );
e4.batを実行した。 (%i2) batch("e4.bat");
read and interpret file: e4.bat (%i3) for x from 2 while x < 20 do (y :
2 3 4
5
6
2 3 4
5 13 factor(1 + x + x + x + x + x + x + (1 + x + x + x + x + x ) x ), print( x=, x), print(factor(x)=, y)) x= 2 factor(x)= 516223 x= 3 factor(x)= 5 43 113 23887 x= 4 factor(x)= 19 23 1181 177493 x= 5 factor(x)= 4768066425781 x= 6 factor(x)= 131 757 1031 1191979 x= 7 factor(x)= 11 12697 13602352139 x= 8 factor(x)= 5 29 613 787 294311239 x= 9 factor(x)= 139 99241 12240832159 x= 10 factor(x)= 2383 4871 95722687727 x= 11 factor(x)= 17 829 150989 2874167089 x= 12 factor(x)= 286553 101355164942501 x= 13 factor(x)= 5 31 12689 61941720222511 x= 14 factor(x)= 13 59 861059 696082945687 x= 15 factor(x)= 61 25609 39241 25831125349 x= 16 factor(x)= 5037190614820997632273 x= 17 factor(x)= 419 203914241 174883133167 x= 18 factor(x)= 5 11 757470935328741628777 x= 19 factor(x)= 157 569 61843 293107 67876157 (%o3)
done (%o3)
e4.bat (%i4)