ALGORITHMEN - Teil XVII: Im Gruselkeller der Hirnwindungen

Jetzt mitmachen!

Sie haben noch kein Benutzerkonto auf unserer Seite? Registrieren Sie sich kostenlos und nehmen Sie an unserer Community teil!

  • In unserem nun schon allseits bekannten "ALGORITHMEN-Stadel für gestrandete Progammier-Existenzen" schlagen wir nun ein neues Kapitel auf. Es wird zwischen Genie und Wahnsinn angesiedelt sein, mit starker Tendenz zu letzterem. Was daran neu ist, fragt Ihr? Nun, z.B. Programmierwettbewerbe zu kleinen Aufgaben der täglichen Praxis, sozusagen Schnipsel, die vor allem auch Anfänger brauchen können. Die könnten wir dann anschließend gemeinsam bewerten nach Kriterien wie "schnellster Beitrag" :ball: , "kürzester Sourcecode" :hmmm: , "eleganteste Lösung" :idee: , "performanteste Variante" 8-) , "pflegeleichtester Code" :lesen: etc.
    Was haltet Ihr davon?
    Gruss



    P.S.: Hier setze ich schon mal ein Link auf das letzte GESAMTINHALTSVERZEICHNIS der bisherigen ALGORITHMEN-Beiträge. Dauert aber noch ein bisschen!

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

    2 Mal editiert, zuletzt von p. specht ()

  • Ich probier´s mal:


    Abt. KLEINE PROGRAMMIERAUFGABEN - KPA Nr.1 "Schachbrett"
    ===========================================
    Setze ein Schachbrett-Muster (8 x 8 Felder) auf. Es sollte auch einen Rand von 2 Feldbreiten aufweisen und die theoretische Möglichkeit, es später mit Feldwerten zu besetzen, die irgendwann vielleicht Schachfiguren oder Damesteine bedeuten werden.


    Wer macht mit?


    P.S.: Bitte die XProfan-Version des Beitrags dazuschreiben!

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

  • So, das Link aufs Gesamtverzeichnis im 1. Beitrag oben ist nun aktiv. Diesmal beide Programme gezippt als reine Interpreter-Files, damit auch andere Browser als Firefox einprogrammiert werden können.
    Gruss

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

  • Abt. Noch mehr Rätsel - NmR 1
    -----------------------------------
    Die Zahlen 309, 41, 5, 7, 68, und 2 dürfen in beliebiger Reihenfolge zu einer 10stelligen Zahl kombiniert werden. Wie lautet die größte dieser Zahlen, wie die kleinste?

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

    Einmal editiert, zuletzt von p. specht ()

  • Abt. Gibts dafür Verwendung?
    ===================
    Die Logikfunktion ´=´ liefert einen Wahrheitswert, in XProfan is das 0 (false) und 1 (true).
    Ketten solcher Funktionen werden laut Hilfe von RECHTS NACH LINKS aufgelöst, in der Praxis scheint sich aber eine Tree-Funktion von links und rechts mit Vergleichen an die Mitte der Kette heranzuarbeiten. Es ist daher gut, daß in neueren XProfan-Versionen ´==´ als Vergleichszeichen gilt.


    (Wert:Vergleich) 1: 0=0, 0: 0=1, 0: 1=0, 1: 1=1 <<< Hier läuft noch alles normal.


    Wie reagiert das System aber auf
    0=0=0, 0=0=1, 0=1=0, 0=1=1, 0=2=2, 2=0=2 etc.? <<< Hier gilt die Regel aus der Hilfe,


    Das nachfolgende Progi zeigt bei längeren Ketten aber unterschiedliche Verhaltensweisen, je nachdem ob z.B. eine gerade oder ungerade Anzahl an Vergleichen angegeben ist. Es dient zum Studium der Frage, ob dafür irgend eine sinnvolle Anwendung gefunden werden kann.
    Gruss

    Code
    CLS:font 2:declare i&,j&,k&,u&,v&,w&
    Whileloop 0,2:i&=&Loop:Whileloop 0,2:j&=&Loop:Whileloop 0,2:k&=&Loop
    Whileloop 0,2:u&=&Loop:Whileloop 0,2:v&=&Loop:Whileloop 0,2:w&=&Loop
    print "   ";i&=j&=k&=u&=v&=w& ;" :=  ";i&;"=";j&;"=";k&;"=";u&;"=";v&;"=";w&
    if %csrlin>31:waitinput:locate 1,1:endif
    endwhile:endwhile:endwhile:endwhile:endwhile:endwhile:beep:waitmouse

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

    2 Mal editiert, zuletzt von p. specht ()

  • KPA 1


    OpenGL wär sicher schöner anzusehen...

    Programmieren, das spannendste Detektivspiel der Welt.

    Einmal editiert, zuletzt von Michael Wodrich () aus folgendem Grund: die auskommentierte Funktion lief nicht

  • @Michael Wodrich: NmR 1 ist korrekt gelöst! Sagt auch das Prüfprogramm:

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

  • Ad Beitrag #6: @Michael Wodrich zu KPA Nr.1 "Schachbrett"
    Eine gültige Lösung samt Figuren-Fleissaufgabe, die aber den Schachbrettalgorithmus selbst durch ihre klare Gliederung und gute Lesbarkeit nicht verdeckt! Da kann man unzweifelhaft schon mal den Preis als schnellster eingetroffener Beitrag vergeben: :ball: TOOOOOOOOR!


    Aber wer weiß, was da noch alles an eleganten, kurzen und/oder gefinkelten Lösungen eintrudelt?
    Das Thema bleibt also vorerst offen - bitte um rege Beteiligung, dann lernen wir alle was dazu!
    :bravo:

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

  • Quellcode zu NmR 1


    Durch das Sortieren ist es langsamer, aber erster und letzter Wert lassen sich einfach herausgreifen.

  • KPA 1
    -------
    Hab' demnächst eh mit der Umsetzung von Spielbrettern zu tun, von daher kam mir die Übungsaufgabe gelegen.
    Ich hatte mich bisher nur mit Objekten in dynamischen Arrays beschäftigt und wollte nun Dank Deiner Anregung auch mal ein mehrdimensionales probieren.
    Feldeigenschaften und Methoden sind aber so gut wie nicht vorhanden, also rechtfertige ich diesen Post allein damit, daß Herr Specht Schachbretter sehen wollte..
    Danke für Deine Anregungen!
    Gruß
    KJ


  • Das als Objekt zu planen ist natürlich noch besser.


    Hab einfach mal die Farben geändert
    brett = New(schachbrett, 15, rgb(255,206,158),rgb(209,139, 71), $001040)


    Sieht echt cool aus.


    Wenn jetzt noch jemand die Figuren als Einfach-Zeichnung hinbekommt, dann belebt sich das Ganze.


    Bin auf glChess bei Gnome gestossen. Ist 2D und bissl 3D. Mal sehen, vielleicht geht da noch was...

  • Abt. Noch mehr Rätsel - NmR 2
    ------------------------------
    Gesucht ist die kleinste natürliche Zahl mit Ziffernsumme 2018.
    Wieviele Stellen hat sie und welche Ziffer steht ganz links?

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

  • Abt. Noch mehr Rätsel - NmR 3
    =======================
    Karl arbeitet jeweils 4 Tage hintereinander und hat am fünften Tag frei. Heute sei Sonntag, der 1. März, und Karl hat frei. Wann hat er wieder am Sonntag frei?

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

  • Abteilung Schachbrett :
    Der IF hatte mal was in dem anderen Forum gemacht :
    http://xprofan.net/intl/de/spiele/schach-brett-engine/


    Da gibt es einen Bereich (mem#), der alle Bilder als Bmp enthält.


    Vielleicht kann man ja die Einzelbilder (Abschnitte der Bmp) in eine ImageList
    transferieren. Das Catchen geht ja wunderbar mit :




    Vorteil : man braucht dann keine extra bmp-Datei.

  • @Heinz Brill: Da würde ich erst mal die Genehmigung von iF einholen. Er ist ja jetzt wieder im Lande!


    Schachfiguren sind auch als UNICODE verfügbar! LINK

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

    4 Mal editiert, zuletzt von p. specht ()

  • Auflösung zu NmR 3
    -------------------
    @Verzweifelte200 hat den Vogel abgeschossen: 36.März = 5.April !


    P.S.: Wer das per Computer ausrechnen will: Hier hilft das ´Kleinste gemeinsame Vielfache kgV´ mit den Werten 5*n = 7*m; n,m = Integer

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

    3 Mal editiert, zuletzt von p. specht ()

  • Abt. Schachbrettmuster
    ==================
    Konnte mir´s nicht verkneifen, auch ein Minibeispiel beizusteuern. Figuren würden bei mir als ASCII-Zeichen draufgestellt.

    HP255G7:Win10pro2.004,4*AMD Ryzen3200U@2.60GHz,6+2GB-RadeonVega/237GBSSD:intlDVDRW,3xUSB3 ext4TB-HDX,XProfanX3+Xasm/Xpse

    Einmal editiert, zuletzt von p. specht () aus folgendem Grund: Figurenvorschlag eingearbeitet