Abt. 2147398650
=============
ist die größte Zahl, die aus allen Dezimalziffern ohne Wiederholung besteht und von einer XProfan-Integervariable mit 31 bit plus Vorzeichen gerade noch darstellbar ist.
Gruss
ALGORITHMEN - Teil XXV: Das Fleisch ist willig, aber der Geist ist schwach...
-
p. specht -
21. Februar 2020 um 03:02 -
Geschlossen
-
-
-
Abt. ROR32 / ROL32 auf "unsigned Integers"
================================
... nochmals leicht verbessert: Redundante Klammerung entfernt und
Überdrehungs-verifiziert von -1024 bis +1024 Rotationsschritten.
Gruss -
Abt. FGS-16
=========
Die kleine Maria hat genausoviele Brüder wie Schwestern. Jeder Bruder von ihr hat um 50% mehr Schwestern als Brüder. Frage: Wieviele Kinder gibt es in dieser Familie? -
Abt. Muss man nicht wissen
=====================
Die 1. Kommastelle der Kreiszahl Pi in ihrer dezimalen Darstellung (3.14159.....) ist 1. Aber erst an der 16740. Stelle steht wieder ein positionsidentischer Wert, nämlich "16740", und an der 44899. Stelle steht die nächste positionsidentische Ziffernfolge "44899". Das nächste dieser denkwürdigen Ereignisse ist erst bei Position 79 873 884 zu finden. Weitere mittlerweile bekannte "self locating strings" sind neben 1, 16740, 44899, 79873884: 711939213, 36541622473. 45677255610, 62644957128 und 656430109694. Man bedenke die Zeit, Rechenleistung, Energie sowie das CO2, welche in solche ´Erkenntnisse´ gewandert sind! Allerdings auch in diesen Beitrag ...
GrussQ: Youtube
-
Abt. FGS-17
==========
Eiine erste Zahl bestehe aus Zehner-Ziffer a und Einer-Ziffer b, wobei a <> b und weder a noch b = 0 sind. In einer zweiten Zahl sind a und b vertauscht. Gesucht: Was ist die größtmögliche Differenz D = ´ab´ - ´ba´ ? -
Abt. Sterngucker
=============
Weil die Venus gerade so schön hell im Westen leuchtet: STERNATLAS ONLINE
GrussP.S.: Wer sich für Mathematische Lyrik interessiert: Fun-Link
-
Abt. FGS-18
==========
Wieviele zweistelllige positive Quadratzahlen haben die Eigenschaft, daß das Produkt ihrer Ziffern ebenfalls eine Quadratzahl ist? -
Abt. FGS-19
=========
Drücke 10 / 8 + 8 / 10 als Dezimalzahl aus! Wenn geht, im Kopf! -
Abt. FGS-20
=========
Bei einem Würfel mit Seitenlänge 1 wird die Höhe verdoppelt, die Breite verdreifacht und die Tiefe versechsfacht. Dadurch entsteht ein Quader. In welchem Verhältnis steht die Oberfläche des Quaders zu jener des ursprünglichen Würfels? -
Abt. Nützliche Links für Binär-Programmierer
=================================
The entire World of Bit Twiddling Hacks: Sehr gute Übersichts- und Link-Site zu binären Tipps und Tricks
Programming Pages by Jasper Neumann: Bit Permutations, Hashing & other tricks
Beide Seiten enthalten leider etwas veraltete Links auf:
Hackers Delight, aber hier gibt es eine Textprobe (Pdf-Datei).
GrussP.S.: Hier noch eine Einiführung in die Binärwelt, mit einigen Tricks (engl.)
-
-
Abt. Simpler Bit-Reverser für 32-bit (signed or unsigned) Integers
================================================
Die nachstehende Proc spiegelt alle bits einer XProfan 32-bit Integervariable an der Mitte. Beschleunigungsversuche a la C++ Code verliefen bis dato leider negativ, da sich Shift-Left bei negativen Shift-Schritten - anders als in C - nicht umrkehrt. Die Sache hier ist ausgiebig getestet, bleibt aber dennoch ohne jede Gewähr!
GrussCode
Alles anzeigenWindowTitle "REVERSE32 für 32bit Signed und Unsigned Integervariablen" Cls:font 2:Randomize:Declare b& Proc Reverse32 parameters v& declare r& Whileloop 32 r&=r&<<1 r&=r& | (v& & 1) v&=v&>>1 EndWhile return r& EndProc Proc Lbin$ :parameters x& return right$("000000000000000000000000000000000"+bin$(x&),32) endproc Proc Testprt print " ";Lbin$(b&);"\n ";Lbin$(Reverse32(b&)) EndProc ' Tests b&=%10110011100011110000111110000000 : Testprt : print b&=%0 : Testprt : print waitinput 3000 WHILELOOP 0,31 b&=2^&Loop Testprt ifnot b&=Reverse32(Reverse32(b&)) print "Reversing Error at ";b&,Reverse32(Reverse32(b&)) testprt sound 2000,200 waitinput endif waitinput 100 ENDWHILE waitinput 2000 WHILELOOP 0,31 b&=2^32-2^&Loop Testprt ifnot b&=Reverse32(Reverse32(b&)) print "Reversing Error at ";b&,Reverse32(Reverse32(b&)) testprt sound 2000,200 waitinput endif waitinput 100 ENDWHILE waitinput 3000 whileloop 5000 if &Loop/50 mod 2 WindowTitle " AUTO TEST MODE running Test Nr. "+str$(&Loop) else WindowTitle " "+\ "Test Nr. "+str$(&Loop) endif b&=rnd(2^31-1)*(1-2*(rnd()<0.33)) ifnot b&=Reverse32(Reverse32(b&)) print "Reversing Error at ";b&,Reverse32(Reverse32(b&)) testprt sound 2000,200 waitinput endif waitinput 22 Case %key=27:break endwhile print "\n Random Tests:" WHILELOOP 1000 b&=rnd(2^31-1)*(1-2*(rnd()<0.5)) Testprt Waitinput 2000 case %key=27:BREAK ENDWHILE print "\n Tests done. BYE!" Waitinput 4000 END
-
Abt. FGS-21 ´Pipi´
==============
Es gibt eine Dezimalzahl Pipi in der Nähe von Pi, die - berechnet man AA = 1 / Pipi, in AA gleich nach dem Komma wieder auftaucht - sprich: Null-Komma-Pipi. Wie lautet sie? -
Abt. FGS-22 ´Pflanzengalerie´
=======================
Der Abstand zwischen dem oberen Rand eines auf einem Tisch stehenden Pflanzentopfes und dem oberen Rand eines weiteren, am Boden darunter stehenden Pflanzentopfs beträgt 150 cm. Tauscht man die beiden Töpfe gegeneinader aus, so beträgt der beschriebene Abstand nun 110 cm. Frage: Wie hoch ist der Tisch? -
Abt. FGS-23
=========
Wieviele Quadratzahlen haben 7 an ihrer Einerstelle? -
Abt. FGS-24 ´Würfelturm´
====================
Drei übliche Spielwürfel sind so aufeinandergestapelt, dass die einander jeweils berührenden Seitenflächen zusammen die Augenzahl 5 ergeben. Die Augenzahl auf der sichtbaren obersten Seite ist gerade. Frage: Welche Augenzahl hat die unterste Seite dieses ´Turms´? -
Abt. FGS-25 ´Quadratzahlnähe?´
========================
Finde jene zwei positiven ganzen Zahlen, die mit der geringstmöglichen Differenz zueinander, ausmultipliziert die Zahl 1234567890 ergeben. -
Abt. FGS-26
==========
Gegeben: a + b = 5 und a*b = 3.
Gesucht: a^4 + b^4 = ? -
Abt. FGS-27 ´Waagerechte Waage´
===========================
Drei Äpfel plus eine Birne wiegen genau so viel wie zehn Zwetschken. Ein Apfel plus sechs Zwetschken wiegen genau so viel wie eine Birne. Frage: Wie viele Zwetschken wiegen genau so viel wie eine Birne?Edit: Übersetzung ´Zwetschken´: Österr. für ´Pflaumen´ (= Oberbegriff)
-
Bei uns heißen die ZWETSCHGEN.
-
Jetzt mitmachen!
Sie haben noch kein Benutzerkonto auf unserer Seite? Registrieren Sie sich kostenlos und nehmen Sie an unserer Community teil!