bidde code anguggen(und schreiben was falsch ist :-) )

Übersicht BlitzBasic Allgemein

Neue Antwort erstellen

 

-slop-

Betreff: bidde code anguggen(und schreiben was falsch ist :-) )

BeitragDo, Dez 22, 2005 13:33
Antworten mit Zitat
Benutzer-Profile anzeigen
hallo erstmal bin neu hier Smile

also ich bin totaler anfänger und hab jetz mal versucht ein prog. zu schreiben das sich eine rechenaufgabe asudenkt und du musst das ergebnis hinschreiben dann soll natürlich noch überprüft werder ob es richtig ist und wenn nicht das richtige ergebnis genannt werden...also das is mein code:

AppTitle mathetrainer
SeedRnd MilliSecs()

Print "MATHETRAINER"

Print
Print

aufgabe = 0

Repeat

aufgabe = aufgabe + 1
Print "aufgabe " + aufgabe

task = Rand(1,100)
Delay 1000
task2 = Rand (1,4)
Delay 1000
task3 = Rand(1,100)


If task2 = + Then
ergebnis = task + task3
ElseIf task2 = - Then
ergebnis = task - task3
ElseIf task2 = * Then
ergebnis = task * task3
Else Then
ergebnis = task / task3
EndIf


userergebnis = Input(ergebnis: )

If ergebnis = userergebnis Then
Print "richtig"
ElseIf
Print "falsch...richtiges ergebnis " + ergebnis
EndIf

Until aufgabe >= 100


ist das überhaupt annähernd richtig oder geht das so wie ichs versucht hab garnich???


thx schonmal im vorraus
mfg slop Very Happy
 

David

BeitragDo, Dez 22, 2005 13:42
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi!

Doch, theoretisch gehts schon... Nur sind ein paar Fehler drinn!

BlitzBasic: [AUSKLAPPEN]

If task2 = + Then
ergebnis = task + task3
ElseIf task2 = - Then
ergebnis = task - task3
ElseIf task2 = * Then
ergebnis = task * task3
Else Then
ergebnis = task / task3
EndIf


Hier musst du z.B. nicht nach +-*/ prüfen sondern nach 1,2,3 oder 4.

grüße
 

BlitzBasic303

Betreff: RE:

BeitragDo, Dez 22, 2005 14:09
Antworten mit Zitat
Benutzer-Profile anzeigen
Der Code ist soweit richtig! Nur die Überschrift...*kopfschüttel* Very Happy
 

Schnuff

BeitragDo, Dez 22, 2005 14:26
Antworten mit Zitat
Benutzer-Profile anzeigen
BlitzBasic: [AUSKLAPPEN]
AppTitle \"mathetrainer\"
SeedRnd MilliSecs()

Print \"MATHETRAINER\"

Print

aufgabe = 0

Repeat

Print
aufgabe = aufgabe + 1
Print \"aufgabe \" + aufgabe

task = Rand(1,100)
;Delay 1000
task2 = Rand (1,4)
;Delay 1000
task3 = Rand(1,100)


If task2 = 1 Then
ergebnis = task + task3
Print task+\" + \"+task3
ElseIf task2 = 2 Then
ergebnis = task - task3
Print task+\" - \"+task3
ElseIf task2 = 3 Then
ergebnis = task * task3
Print task+\" * \"+task3
Else
ergebnis = task / task3
Print task+\" / \"+task3
EndIf


userergebnis = Input(\"ergebnis: \")

If ergebnis = userergebnis Then
Print \"richtig\"
Else
Print \"falsch...richtiges ergebnis \" + ergebnis
EndIf

Until aufgabe >= 100

probiers mal so Very Happy
 

-slop-

BeitragDo, Dez 22, 2005 15:36
Antworten mit Zitat
Benutzer-Profile anzeigen
habs genau so geschrieben... kommt aber immer noch " expecting')' "
wenn ichs starten will
also nochmal mein aktueller codeZitat:
AppTitle mathetrainer
SeedRnd MilliSecs()

Print "MATHETRAINER"

Print
Print

aufgabe = 0

Repeat

aufgabe = aufgabe + 1
Print "aufgabe " + aufgabe

task = Rand(1,100)
;Delay 1000
task2 = Rand (1,4)
;Delay 1000
task3 = Rand(1,100)


If task2 = 1 Then
ergebnis = task + task3
Print task + "+" + task3
ElseIf task2 = 2 Then
ergebnis = task - task3
Print task + "-" + task3
ElseIf task2 = 3 Then
ergebnis = task * task3
Print task + "*" + task3
Else
ergebnis = task / task3
Print task + "/" + task3
EndIf


userergebnis = Input(ergebnis: )

If ergebnis = userergebnis Then
Print "richtig"
ElseIf
Print "falsch...richtiges ergebnis: " + ergebnis
EndIf

Until aufgabe >= 100


sorry bin eben ein totaler anfänger Smile

mfg slop
 

David

BeitragDo, Dez 22, 2005 16:25
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi!

Du musst dir unbedingt ein paar Grundlagen aneignen!
Z.B. die verschiedenen Datentypen usw...

An welcher Stelle kommt denn der Fehler? Ich seh gerade das

BlitzBasic: [AUSKLAPPEN]

Input(ergebnis: )


Nicht richtig sein kann. Siehe Datentypen!

grüße
 

Paranoide

BeitragDo, Dez 22, 2005 19:25
Antworten mit Zitat
Benutzer-Profile anzeigen
-slop- hat Folgendes geschrieben:


userergebnis = Input(ergebnis: )

If ergebnis = userergebnis Then
Print "richtig"
ElseIf
Print "falsch...richtiges ergebnis: " + ergebnis
EndIf


Den Teil musst du noch umändern in:

BlitzBasic: [AUSKLAPPEN]
userergebnis = Input(\"Ergebnis:\")

If ergebnis = userergebnis Then
Print \"Richtig!\"
Else
Print \"Falsch...richtiges Ergebnis: \" + ergebnis
EndIf


Im Inneren der Klammer bei Input() muss es als ein String geschrieben werden, daher die Anführungszeichen und bei deinem "ElseIf" muss es "Else" heißen, weil du keine weitere Bedingung dahinter geschrieben hast.

Allerdings solltest du dir wirklich erst einmal ein paar Grundlagen durchlesen und auch ein bisschen was an deiner Darstellung ändern...so, wie es jetzt ist, wird es nur schlecht leserlich im Programm hintereinander aufgereiht. Ach ja, und bei deinen "geteilt durch..."-Aufgaben solltest du dir nochmal was überlegen, da es schwierig ist, eine Aufgabe wie 7/22 zu lösen und vor allem dann auch noch hinzuschreiben!!! Smile

MfG

Michel
 

-slop-

Betreff: juhujuhujuhu

BeitragDo, Dez 22, 2005 21:35
Antworten mit Zitat
Benutzer-Profile anzeigen
jaaa...jetz tuts !!! ... thx an alle ... ich weiss dass ich noch einiges noch nich wirklich begriffen hab aber ich wollt halt mal was schreiben wo ich nicht nach irgendeiner vorlage gemacht hab...also nochmal thx an alle
8) -slop-

Neue Antwort erstellen


Übersicht BlitzBasic Allgemein

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group