Komputeralgebrai algoritmusokJ\303\241rai AntalEzek a programok csak szeml\303\251ltet\303\251sre szolg\303\241lnak.1. T\303\266rt\303\251netrestart;E 1.1. P\303\251lda. 33!/2^31+41^41;43!/(2^43-1);483952545774574373476/122354323571234 mod 1000003;10*(8+6*I)^(-1/2);evalc(%);sqrt(15523/3-98/2);a:=sin(Pi/3)*exp(2+ln(33));simplify(a);evalf(a);evalf(a,60);n:=19380287199092196525608598055990942841820;isprime(n);ifactor(n);nextprime(n);igcd(15990335972848346968323925788771404985,15163659044370489780);a:=(x+y)^12-(x-y)^12;expand(a);quo(x^3*y-x^3*z+2*x^2*y^2-2*x^2*z^2+x*y^3+x*y^2*z-x*z^3,x+y+z,x);gcd(x^3*y-x^3*z+2*x^2*y^2-2*x^2*z^2+x*y^3+x*y^2*z-x*z^3,x+y+z);b:=(x^4-y^4)/(x^3+y^3)-(x^5+y^5)/(x^4-y^4);normal(b);f:=(x+y)*(x-y)^6; g:=(x^2-y^2)*(x-y)^3; f/g;normal(f/g);factor(x^6-x^5+x^2+1);factor(5*x^4-4*x^3-48*x^2+44*x+3);Factor(x^6-x^5+x^2+1) mod 13;factor(x^12-y^12);restart;alias(a=RootOf(x^4-2));factor(x^12-2*x^8+4*x^4-8,a);Factor(x^6-2*x^4+4*x^2-8,a) mod 5;V:=vandermonde([x,y,z]);with(linalg);V:=vandermonde([x,y,z]);inverse(V);det(V);factor(%);e1:=(1-eps)*x+2*y-4*z-1=0;e2:=(3/2-eps)*x+3*y-5*z-2=0;e3:=(5/2+eps)*x+5*y-7*z-3=0;sols:=solve([e1,e2,e3],[x,y,z]);subs(eps=10^(-20),sols);f:=x^2*y*(1-x-y)^3;e1:=diff(f,x); e2:=diff(f,y);solve([e1,e2],[x,y]);limit(tan(x)/x,x=0);diff(ln(sec(x)),x);series(tan(sinh(x))-sinh(tan(x)),x=0,15);series(BesselJ(0,x)/BesselJ(1,x),x,12);int(((3*x^2-7*x+15)*exp(x)+3*x^2-14)/(x-exp(x))^2,x);int((3*x^3-x+14)/(x^2+4*x-4),x);int(x*exp(x^3),x);diff_eqn:=diff(y(x),x$2)+t*diff(y(x),x)-2*t^2*y(x)=0;init_conds:=y(0)=t,D(y)(0)=2*t^2;dsolve({diff_eqn,init_conds},y(x));Cheby:=proc(n,x) local T,k;
T[0]:=1; T[1]:=x;
for k from 2 to n do
T[k]:=expand(2*x*T[k-1]-T[k-2]);
od; T[n];
end;Cheby(7,x);LUklbXJvd0c2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkdGJzYjLUkjbWlHRiQ2JVEhRicvJSdpdGFsaWNHUSV0cnVlRicvJSxtYXRodmFyaWFudEdRJ2l0YWxpY0YnEx1.3. Feladat.int(x/(1+exp(x)),x);
int(exp(x^2),x);
int(sqrt((x^2-1)*(x^2-4)),x);
int(sqrt((x-1)*(x-4)),x);
int(sqrt((1+x)/(1-x)),x);
int(log(x^2-5*x+4),x);
int(log(x)/(1+x),x);
int(1/log(x),x);LUklbXJvd0c2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkdGJzYjLUkjbWlHRiQ2JVEhRicvJSdpdGFsaWNHUSV0cnVlRicvJSxtYXRodmFyaWFudEdRJ2l0YWxpY0YnLUklbXJvd0c2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkdGJzYjLUkjbWlHRiQ2JVEhRicvJSdpdGFsaWNHUSV0cnVlRicvJSxtYXRodmFyaWFudEdRJ2l0YWxpY0Yn2. Algebrai alapok3. Norm\303\241l form\303\241k, reprezent\303\241ci\303\2634. Aritmetika5. K\303\255nai marad\303\251kol\303\241s6. Newton-iter\303\241ci\303\263, Hensel-felemel\303\251s7. Legnagyobb k\303\266z\303\266s oszt\303\2638. Faktoriz\303\241l\303\241s9. Egyenletrendszerek10. Gr\303\266bner-b\303\241zisok11. Racion\303\241lis t\303\266rtf\303\274ggv\303\251nyek integr\303\241l\303\241sa12. A Risch-algoritmus.LUklbXJvd0c2Iy9JK21vZHVsZW5hbWVHNiJJLFR5cGVzZXR0aW5nR0koX3N5c2xpYkdGJzYjLUkjbWlHRiQ2JVEhRicvJSdpdGFsaWNHUSV0cnVlRicvJSxtYXRodmFyaWFudEdRJ2l0YWxpY0Yn