Off Topic bin bb anfänger ... bitte code anguggen
bin bb anfänger ... bitte code anguggen
4 replies hallo,
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 DC Admin 
Offline
Ähm. Das Prinzip stimmt, aber es sind viele grobe Fehler drin, die du sicher auch selber finden könntest, wenn du dir deinen eigenen Code oder die Befehlsreferenz ( www.blitzbase.de ) mal RICHTIG angucken würdest.
Das wirkt auf mich so, als wäre es mehr oder weniger schnell hingeklatscht, dann wurde festgestellt, dass es so nicht klappt, und dann wurde es einfach hier gepostet ohne selber besonders drüber nachzudenken.
Ein paar Hinweise:
Rand(1,4) liefert nicht +,-,* oder / 
Die Rechenaufgabe wird garnicht ausgegeben
ElseIF ohne eine Bedingung bringts nichts und Then darf man nicht hinter Else benutzen
Texte, also alles außer Zahlen und Befehlen müssen immer in Anführungszeichen gesetzt werden.
Ansonsten lege ich dir www.blitzforum.de ans Herz.
Das hier ist kein Forum über Programmierung mit Blitz Basic und somit kannst du hier nur bedingt mit Hilfe rechnen. oki ... versuchs nochmal und wenns denn net klappt schreb ich ins blitzforum...wie gesagt : bin halt ziemlich neu auf dem gebiet ( seit sonntag ) ...
thx -slop- *tip*
select task2
case 1
task2s$ = "+"
case 2
task2s$ = "-"
case 3
task2s$ = "*"
case 4
task2s$ = "/"
end select jop blitzforum ist erste sahne !! bin dort selber unterwegs !! 
1 
