Zum Inhalt springen
Aufgabe: https://twitter.com/HansruediWidmer/status/1135056761340211200 Code: laenge:4$ f[0]:0$ f(n):=6*(10^n-1)/(10-1)$ g(n):=10^(n-1)$ h(n):=g(n)+f(n-1)$ summand1:makelist(h(i),i,1,laenge)$ f(n):=5*10^(n-1)$ summand2:makelist(f(i),i,1,laenge)$ f(n):=3*(10^n-1)/(10-1)$ summand3:makelist(f(i),i,1,laenge)$ ergebnis:makelist(summand1[i]^3+summand2[i]^3+summand3[i]^3,i,1,laenge)$ wxMaxima:
Aufgabe: Beispiel 3 von Jutta Gut. http://members.chello.at/gut.jutta.gerhard/kurs/folgenueb.htm Code: a:limit(5*n-3,n,inf)$ b:limit(20-2*n,n,inf)$ c:limit(n^2-6*n,n,inf)$ d:limit(n^3-n^2,n,inf)$ e:limit(1/2^n,n,inf)$ f:limit((-1)^n/n,n,inf)$ g:limit((3*n+1)/(2*n),n,inf)$ h:limit(1/(n^2+1),n,inf)$ print(" ")$ print("Die Grenzwerte")$ display(a,b,c,d,e,f,g,h)$ Exemplarisch Aufgabe (h) mit WolframAlpha. Vroomlab:
Vorbemerkung: Wenn man z.B. in Google nach "Grandi Summe" sucht, erhält man zahlreiche Fundstellen, die man etwas näher anschauen sollte. Das ist noch in Arbeit. Code: f(x,n):=sum(x^k,k,0,n); makelist(f(-1,i),i,1,10); assume(abs(x)<1); f(x,inf),simpsum;…
Aufgabe: Man programmiere die drei vorkommenden Summen in Maxima. Eine einfache Übung! https://twitter.com/HansruediWidmer/status/853128090431758337 Code: 1/* Erste Summe */$ liste:makelist(i^2*(-1)^i,i,14,1,-1); sum(liste[i],i,1,length(liste)); 2/* Zweite Summe */$ liste:makelist(i^2*(-1)^(i-1),i,15,6,-1); sum(liste[i],i,1,length(liste)); 3/* Dritte Summe */$…
Aufgabe: Das Thema war in Facebook zu finden. Hier ist der Link dazu. Die Einbetten-Funktion von Facebook kann man gut in Wordpress verwenden! https://www.facebook.com/ArtOfMathematics/posts/274725782948803:0 Code 01: P(k,n):=(n^2*(k-2)-n*(k-4))/2; P3:makelist(P(3,n),n,1,5); P4:makelist(P(4,n),n,1,5); P5:makelist(P(5,n),n,1,5);…
Aufgabe (es soll mindestens 2 Lösungen geben, es werden wohl viele sein): https://twitter.com/pickover/status/801597352184201216 Lösung: Code: Ziffern:makelist(z,z,1,9); P:listify(permutations(setify(Ziffern)))$ n:3;i:0; while n>1 do block( ev(i:i+1),Folge:P[i],S1:sum(Folge[j],j,1,4), S2:sum(Folge[j],j,4,7), S3:sum(Folge[j],j,7,9)+Folge[1], Seitensummen:[S1,S2,S3], n:cardinality(setify(Seitensummen)) ); display(Folge,Seitensummen); Erklärung…
