Das deutsche QBasic- und FreeBASIC-Forum

[SunTzu]

Hallo,

versuche mich gerade in QBasic einzuarbeiten!

Habe ein kleines Programm geschrieben, welches mir nach einer Berechnung ab oder aufrundet!

Mein Problem ist, dass das Programm zwischen 0 und 1 in ,10 Schritten auf oder abrunden soll.
Das Programm sollte aber die Stationen der viertel Punkte auch in Betracht ziehen.
Beispiel: ----Bedingungen -----
Bei 0.03 rindet er auf 0 ab
Bei 0.05 rundet er auf 0.10 auf
Bei 0.023 soll er nicht abrunden, sondern auf 0.25 aufrunden!

Es ist nur Fraglich ob so ein Befehl Existiert!

Besten Dank
SunTzu

[Jojo]

mit einem trick ist das möglich:

[Keks]

Wenn bei 0.3 auf 0.1, warum dann bei 0.23 auf 0.25?
_________________
RUN "brain.exe"
Datei nicht gefunden

[SunTzu]

Hallo

Habe die Formel gerundet = int (zahl + .5) getestet aber bekomme nur Fehlermeldungen!

Nun da ich weiss wie ich vorgehen muss, werde ich es mit dem if Befehl versuchen!

Praktisch wenn .23 dann .23+.03

Musste doch gehen ?

[nemored]

[SunTzu]

Hallo

Die Rundung finde ich etwas ungewöhnlich, würde ich aber so machen (Pseudocode):
Wenn Zahl >= 0.225 und < 0.275 dann runde auf 0.25, sonst:
Wenn Zahl >= 0.725 und < 0.775 dann runde auf 0.75, sonst:
Runde normal im 0.1-Schritt: gerundet = int(zahl*10+.5)/10

Ist es Möglich diese Formel quasi auf alle Zahlen anzuwenden ?


Danke für die Auskunft!

[SpionAtom]

Wer braucht schon IF-Bedingungen, pffff
Sollte mit allen Zahlen funktionieren.

[dreael]

Zum Thema noch ein längerer Artikel:

http://www.dreael.ch/Deutsch/BASIC-Knowhow-Ecke/Gleitkommazahlen.html

Erläutert eigentlich so ziemlich alle Aspekte vom Titelthema.
_________________
Teste die PC-Sicherheit mit www.sec-check.net

[nemored]

@SpionAtom: Wenn ich es richtig verstanden habe, soll er auf folgende Zahlen runden:
0.1, 0.2, 0.25, 0.3, 0.4, 0.5, 0.6, 0.7, 0.75, 0.8, 0.9, 1.0 usw.
_________________
Deine Chance beträgt 1:1000. Also musst du folgendes tun: Vergiss die 1000 und konzentriere dich auf die 1.

[SunTzu]

Hallo

Richtig erkannt!
Die Schlussfolgerung stimmt!

Es sollte auf alle Zahlen anzuwenden sein, nicht nur zwischen "null" und "eins" !

[nemored]

Für alle Zahlen ist aber kein Problem; du musst nur den Nachkommabereich runden und dann die Vorkommazahl dazuzählen, so wie das SpionAtom schon gemacht hat.
Zahl vor dem Komma: INT(z!)
Nachkommazahl: z! - INT(z!)
gilt zumindest mal für positive Zahlen. Bei negativen ist das anders, aber das sollte beim Runden aufs Gleiche hinauslaufen.
_________________
Deine Chance beträgt 1:1000. Also musst du folgendes tun: Vergiss die 1000 und konzentriere dich auf die 1.

[SunTzu]

Danke an alle
Werde alles nochmal überarbeiten

Bis zum nächsten mal

[SunTzu]

[SpionAtom]

[Jojo]

Es ist vor allem so sinnlos...
Wenn es einfach nur in 1/10-Schritten wäre, könnte man das ganze mal 10 nehmen und dann die INT-Methode nehmen.
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.

[nemored]

[SunTzu]

Okay

Dann werde ich es in 10er Schritten Programmieren, und für den "viertel" mir etwas überlegen!

Ist Blitz Basic besser Entwickelt wie QBasic ?

Danke trotzdem!

[SpionAtom]

Verwende Blitzbasic, wenn du mehr Geschwindigkeit brauchst, oder viel mit Grafiken hantieren willst. Ansonsten kannst du auch bei QB bleiben. Die Freeware-variante wäre dann Freebasic (wie der Name schon sagt).
_________________
Inzwischen gehöre ich auch zu den BlitzBasicern. Also verzeiht mir, wenn mir mal ein LOCATE 100, 100 oder dergleichen rausrutscht.

[Jojo]

Die Frage ist völlig falsch gestellt, und so, wie du sie stellst, würde ich sogar sagen, dass QB "besser entwickelt" ist. Aber du meinst wahrschienlich eher "was ist schneller / hat bessere grafikoptionen / blabla", und da würde ich eindeutig FreeBasic bevorzugen.
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.

[SunTzu]

Nein es geht schon um die Strukturierung, nicht die Geschwindigkeit des Programms!

Vielen dank!