Sponsored links: Algebra eBooks
 

Related

stringdisp

? stringdisp;

Calculate

stringdisp

? stringdisp;

Calculate

stringdisp

Run Example
(%i1)block(stringdisp:true,string("Da einer der beiden Eigenwerte betragsmäßig größer 1 ist, konvergiert die Folge nicht."));
(%o1) ""Da einer der beiden Eigenwerte betragsm??ig gr??er 1 ist, konvergiert \
die Folge nicht.""
(%i2) 
Run Example
kill(base,n,d,r,q);
(%o1)                                done
(%i2) stringdisp:true;
(%o2)                                true
(%i3) obase:10;
(%o3)                                 10
(%i4) base(n,d):=block([q:0, r:n, obase:d], q:0, r:n, while(r>
=d) do(q:q+1,r:r-d, return(concat(q,r))));
(%o4) base(n, d) := block([q : 0, r : n, obase : d], q : 0, r : n, 
                 while r >= d do (q : q + 1, r : r - d, return(concat(q, r))))
(%i5) makelist(base(k,10), k, 1, 10);
(%o5)    [done, done, done, done, done, done, done, done, done, "10"]
(%i6) makelist(base(k,2), k, 1, 10);
(%o6) [done, "10", "11", "110", "111", "1100", "1101", "1110", "1111", "11000"]
(%i7) 
Run Example
kill(base,n,d,r,q);
(%o1)                                done
(%i2) stringdisp:true;
(%o2)                                true
(%i3) obase:10;
(%o3)                                 10
(%i4) base(n,d):=block([q:0, r:n, obase:d], while(r>
=d) do(q:q+1, r:r-d, return(concat(r,q))));
(%o4) base(n, d) := block([q : 0, r : n, obase : d], 
                 while r >= d do (q : q + 1, r : r - d, return(concat(r, q))))
(%i5) makelist(base(k,10), k, 1, 10);
(%o5)    [done, done, done, done, done, done, done, done, done, "01"]
(%i6) obase:2;
(%o110)                               10
(%i7) makelist(base(k,2), k, 1, 10);
(%o111) [done, "01", "11", "101", "111", "1001", "1011", "1101", "1111", 
                                                                       "10001"]
(%i8) 

Related Help

Help for Stringdisp