Sponsored links: Algebra eBooks
 

Related

disp-floor-map-sqrt

"*"/* RECHTWINKELIGES...

"*"/* Eingabe der er...

a:3;

Calculate

disp-do

RSA(p,q):=(n:p*q,disp...

RSA(11,13);

Codage(LETTRE,n,d):=(...

Calculate

disp-dpart-exp

title(exp):=disp(dpar...

(title("a classical t...

x^x^x;

Calculate

disp-dpart-exp-pi-plot2d-sin
plot2d([ua,ub,uc,ua-ub,ua-uc,ub-uc], [x,0,4*%pi], [y,-3,3]);

title(exp):=disp(dpar...

title("3-Phases, Why...

ua:sin(x);

Calculate

disp-makelist-matrix

AA:matrix([003,107,00...

for x:1 thru 6 do D:m...

Calculate

disp

cos2(x) := (cos(x))^2;

%a = cos2(90);

disp (%a);

Calculate

disp-do

RSA(p,q):=(n:p*q,disp...

RSA(11,13);

Codage(LETTRE,n,d):=(...

Calculate

disp-dpart-exp-pi-plot2d-sin

title(exp):=disp(dpar...

title("3-Phases, Why...

ua:sin(x);

Calculate

disp-true

power_disp:true;

A:[6.16,-0.77];

B:[-6.16,0.77];

Calculate

disp-load
draw_graph(g,show_id=true,show_weight=true);

load(graphs);

h1:[[[1,2],1],[[1,3],...

h2:[1,2,3,4,5,6,7,8];

Calculate

disp

Run Example
(%i1)define_variable (foo, 0, float);
(%o1)                                  0
(%i2) fpprec : 600;
(%o2)                                 600
(%i3) for m:301 step 1 thru 310 do(foo: bfloat(sum(k^m/3^k,k,1,2100)),foo: foo-floor(foo),disp(m,foo));
                                      301

                                     0.0b0

                                      302

                                     0.0b0

                                      303

                                     0.0b0

                                      304

                                     0.0b0

                                      305

                                     0.0b0

                                      306

                                     0.0b0

                                      307

                                     0.0b0

                                      308

                                     0.0b0

                                      309

                                     0.0b0

                                      310

                                     0.0b0

(%o3)                                done
(%i4) 
Run Example
zaehler:0;
(%o1)                                  0
(%i2) for zehner:1 thru 10 do \for einer:1 thru 10 do \if zehner+einer<
10 then block(ev:(zaehler:zaehler+1),\disp([zaehler,10*zehner+einer]));
                                    [1, 11]

                                    [2, 12]

                                    [3, 13]

                                    [4, 14]

                                    [5, 15]

                                    [6, 16]

                                    [7, 17]

                                    [8, 18]

                                    [9, 21]

                                   [10, 22]

                                   [11, 23]

                                   [12, 24]

                                   [13, 25]

                                   [14, 26]

                                   [15, 27]

                                   [16, 31]

                                   [17, 32]

                                   [18, 33]

                                   [19, 34]

                                   [20, 35]

                                   [21, 36]

                                   [22, 41]

                                   [23, 42]

                                   [24, 43]

                                   [25, 44]

                                   [26, 45]

                                   [27, 51]

                                   [28, 52]

                                   [29, 53]

                                   [30, 54]

                                   [31, 61]

                                   [32, 62]

                                   [33, 63]

                                   [34, 71]

                                   [35, 72]

                                   [36, 81]

(%o2)                                done
(%i3) 
Run Example
primep(1+334^4);
(%o1)                                true
(%i2) Loesung:[];
(%o2)                                 []
(%i3) for i:334 thru 366 do if primep(1+i^4) then append(Loesung,[i]);
(%o3)                                done
(%i4) disp(Loesung);
                                      []

(%o4)                                done
(%i5) 

Related Help

Help for Disp