1)ukol
(%i1) | A: matrix([1,1,2], [0,-2,1], [-1,0,3]); |
(%i2) | B:transpose(A); |
(%i3) | C:invert(A); |
(%i4) | D:5*(A^^3-4*B)+C^^3; |
(%i5) | determinant(D); |
2)ukol
(%i6) | pol:4*x^2+7*x-4; |
(%i7) | g(x):=x^3; |
(%i8) | map(g, pol); |
3)ukol
(%i9) | pol1:x^2+4; |
(%i10) | gfactor(pol1); |
4)ukol
(%i11) | pol2:x^3+2*x+1+(x/(x+1))^3; |
(%i12) | expand(pol2); |
5)ukol
(%i13) | pol3:2*x^3-5; |
(%i14) | declare(x,real); |
(%i15) | domain:real; |
(%i16) | algsys([pol3],[x]), realonly:true; |
6)ukol
(%i17) | pom:log(x^2-1)-a; |
(%i18) | assume(a>0); |
(%i19) | solve(pom,x); |
7)ukol
(%i20) | wxdraw2d(implicit(x^2/25+y^2/9=1,x,-5,5,y,-3,3),proportional_axes=xy); |
8)ukol
(%i21) | a:integrate(x^3*cos(x), x); |
(%i22) | define(F(x),a); |
(%i23) | F(0); |
9)ukol
(%i24) | h[i,j]:=(gcd(i+1,j+1))^x-1; |
(%i25) | M : genmatrix(h,4,4); |
(%i26) | kill(all); |