Das deutsche QBasic- und FreeBASIC-Forum

[andyx]

WAS FÜR EIN ROMAN !!!

[Skilltronic]

Hallo

Tut mir leid, das ist wohl zu hoch für mich. Du bildest aus sieben Zahlen sieben verschiedene Tippreihen aus je sechs Zahlen (mehr geht ja nicht, jede der sieben Zahlen kommt dann je einmal nicht vor). Dann werden aus 49 Kugeln 14 gezogen, von denen drei sicher in deinen sieben getippten enthalten sind. Dann hättest du sicher sechs dreier und fertig. Ich versteh's nicht.

Gruss
Skilltronic
_________________
Elektronik und QB? www.skilltronics.de !

[andyx]

nein, nein....

aus 49 werden 6 gezogen; ich tippe 7; ich müßte also im vollsystem 7 tippreihen mit je 6 kreuzchen abgeben.

würden sich nun unter meinen sieben getippten tatsächlich 3 richtige (unter den gezogenen 6) befinden, so hätte ich (im vollsystem) vier (4)
Dreier - nicht sieben - nicht sechs - nicht fünf....

nun geht es aber ja darum, (mindestens) EIINEN (1) Dreier zu garantieren, wenn unter meinen getippten 7 sich auch 3 richtige befinden.

im fall 3 von 6 aus 7 von 49 (uahhh!!!) wären es 4 (vier) tippreihen, die diese vorgabe erfüllen... (brauchst es nicht auszuprobieren!!!)

mir hat die kombinatorik genug nerven gekostet und das entsprechende programmieren ebenso.

wenns' dich interessiert.....

ich habe mir jetzt mal freebasic runtergeladen - und habe keinen plan, wie ich das zum laufen bring'111

kannst du mir helfen???

gruß andyx

[Mecki]

So kompilierst du deine BAS-Datei mit dem FreeBASIC-Compiler:

Möglichkeit 1:
einfach in DOS eingeben: FBC BasName.bas

Möglichkeit 2:
die BAS-Datei auf die FBC.EXE drauf ziehen. Allerdings werden dann Fehler nicht unbedingt ausgegeben

Möglichkeit 3:
Du lädst dir eine grafische Benutzeroberfläche für FreeBASIC runter (GUI), wo du dann einfach auf Compilieren klicken kannst.
Zum Beispiel diese oder diese.

Grüßle,
Mecki

PS: Vorher Install.bat starten, um das gedownloadete FreeBASIC 0.13b auch zu installieren Das dauert seine Zeit.
_________________
» Yodl.de: So sucht man gestern.
» Geld verdienen im Netz + ICQ.
» Firefox!
» 100€ zu gewinnen
» FreeBASIC.de

[andyx]

danke mecki,

install hab' ich schon gestartet - hat auch entsprechend gedauert...

o. k.

jetz' lad' ich mir so 'be oberfläche runter...

..und dann werd' ich mich wieder melden...

thanx

[andyx]

o.k. freebasic läuft mit dem zweiten von dir genannten link.

aber arschlangsam...

da "hüpft" auf dem ausgabebildschirm ein Cursor herum...

das wird die janze ausjabe verlansamen, nech?

anyway... so wie's ausschaut, ist freebasic langsamer als QB4.5 - ich probier mal ein bisschen rum...

[MisterD]

wenn du die verzögerungen mit FOR-Schleifen erzeugst is das auf FB zu schnell weil FB deutlich schneller ist als QB45 dann steig auf TIMER-Konstrukte um, ich denk ma, der geht bei FB genauer als 56ms..
_________________
"It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra

[andyx]

Hello MisterD,

ersma danke für anword unso...

... wie meinst du das genau???

außerdem habe ich in freebasic noch'n problem: wie schauen denn die befehle für dateien aus - sequentielle, relative, input#, get# put# usw.?

kannst du mir da weiterhelfen???

[jb]

freeBASIC ist zu QuickBASIC kompatibel, => es müsste auch so klappen.

jb

[MisterD]

also du wirst ja irgendwie verzögerungen eingebaut haben, oder?
wenn du die so gemacht hast:

[Dusky_Joe]

Nicht zu vergessen, dass FB auch die Möglichkeit bietet, Millisekunden zu warten.

QB's SLEEP 1 wartet eine Sekunde.
In FB erzeugt diese Zeile eine Wartezeit von 1 msek, was für Animationen besonders geeignet ist.

Nur einer von vielen Vorteilen, auf die du stoßen wirst
_________________
fully biological degradable

Once, the big wave arrives, you've got two ways, you can go:
Either, you ride it, or you don't do.
But, if you don't ride, you'll never know wether you'd have gone wet.

[andyx]

AVE !!!

"voll kompatibel" scheint freebasic doch nicht zu sein; ich hab' ein kleines testprogramm mit allen von mir verwendeten befehle (in sinnvoller abfolge) in freebasic erstellt.

kleinere probleme (wie z. B. goto-schleifen etc.) sind schnell gelöst, aber mit Dateizugriffen komme ich nicht klar;

wie schaut denn ein befehl in freebasic aus, der in QB auf Relativ-Dateien zugreift???

in QB ist das einfach (warscheinlich auch in FB, wenn man's weiß): eben mit PUT-/GET -Anweisungen... und die entsprechenden Befehle zum Öffnen einer Datei blabla...

...und dann nochmal zu den Verzögerungen; da weiß ich zu wenig drüber - kann mir irgendwer das 'mal einigermaßen idiotensicher erklären (warum braucht man die, wie schauen die genau aus, was machen die usw...)

danke ciao

[Dusky_Joe]

Unter FB gibts immer noch die Befehle GET/PUT, auch auf Dateizugriffe. Bin mir aber ned ganz sicher, ob die auch bei RANDOM-Files funzen, auf jeden fall aber gehn se mit BINARY.
Überhaupt solltest du von RANDOM auf die sequentiellen Modi bzw BINARY umsteigen, weil RANDOM die ganze angelegenheit eher komplizerter als einfacher macht.

Du wirst auch bei anderen Befehlen noch kleine Unterschiede entdecken, z.B. CIRCLE. Das hängt z.T. mit Funktionserweiterungen/einschrängkunen zusammen, andere haben einfach nur eine etwas andere Arbeitsweise.

Circle z.B. zeichnet einen um 1 größeren Kreis als QB, und kann außerdem ausgemalte Kreise zeichnen.

Sieh dir einfach die Referenz an (www.freebasic.de), oder lade sie dir gleich runter (auf feeleasy.net)
_________________
fully biological degradable

Once, the big wave arrives, you've got two ways, you can go:
Either, you ride it, or you don't do.
But, if you don't ride, you'll never know wether you'd have gone wet.

[ah8982]

[psygate]

So, andyx, ich muss auch mal was sagen. Nette idee dein programm, um lottozahlen zu berechnen, aber, WÜRDEST DU BITTE BITTE BITTE ENDLICH DEN QUELLCODE posten?? Ich meine, dass alle hier etwas für dich tun könnten, wenn du den quellcode postest.

-------------------------------
psy
-------------------------------
PS: Ich hatte ads geschwindigkeitsproblem auch mal, aber das hat sich leicht lösen lassen.
Ich brauch keinen 4 Mhz zum übern, ich progge regelmäßig auf einem 18 Mhz rechner, der genau 24 schleifen in der sekunde schafft und nur einen timer mit je 1 sekunde PING-Zeit....

PSS: FRAGE: Wie schaffe ich es, auf so einem ding, eine kkürzere zeit als eine sekunde zu stoppen??

[ah8982]

[Skilltronic]

Hallo

Ich versuche es auch nochmal. Du tippst insgesamt x verschiedene Zahlen. Dann werden y Zahlen gezogen von den z richtig sind. Du willst jetzt wissen wieviele und welche Tipps nötig sind, um zu garantieren, dass die z richtigen mindestens einmal dabei sind. Wenn das so richtig ist, habe ich ein Programm geschrieben das diese Mindestanzahl berechnen kann. Es ist nicht sehr schön und bietet sicher noch viel Optimierungsmöglichkeiten, aber vielleicht ist der Ansatz interessant. Die Zahlen werden in Bitmuster umgewandelt was es möglich macht durch eine AND-Verknüpfung zu überprüfen, ob die eine Kombination in der anderen enthalten ist. Verknüpfungen sind "assemblerfreundlicher" und deshalb relativ schnell in der Ausführung.

Ich bekomme zwar beim Einsetzen von 7 getippten, 6 gezogenen und drei richtigen Zahlen ein Minimum von 4 Kombis, bei 8 jedoch schon 10 und bei 9 bekomme ich 20 raus und nicht wie du früher geschrieben hast 4 und 7. Wenn ich mir die Bitmuster ansehe, scheint das aber zu stimmen. Bei 8 getippten wären die 10 Kombis z.B.:

123456
123457
123467
123567
123458
123468
123568
123478
123578
123678

Andere Kombinationen wären auch möglich, aber 10 müssten es mindestens sein.

Und hier das Programm:

[volta]

Hallo andyx,
warum erkundigst du dich so intensiv nach Dateioperationen?
Benutzt du die Festplatte als Zwischenspeicher großer Datenmengen, die dann in kleinen Häppchen aus den Dateien geholt und durchsucht/verglichen werden?
Das dauert ewig und würde mir die Rechenzeit von einem Jahr, wie du es am Anfang schriebst, erklären.
Dann wird sich auch mit anderen Programmiersprachen nichts verbessern.

Auch um die Grenzen von FreeBasic einmal anzutesten habe ich ein kleines Programm erstellt, das alle Mutationen der Lottozahlen in einem Array (14.000.000 x 6 Integerzahlen) erstellt und anschließend durchsucht.

(Hallo Skilltronic, das ist keine Konkurenz zu deinem Programm. Soweit wie du den Erklärungen von andyx nachgegangen bist, habe ich nicht folgen können.)