Wer ist online?
Buchempfehlung
FreeBASIC-Chat
FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!Tutorial
Anfängerkurs Teil 2 - Variablen, Datentypen und Arrays
von  Sebastian | Seite 4 von 4 |
Um alle Elemente eines Arrays zu durchlaufen, können Sie eine Zählschleife verwenden. Eine Zählschleife führt festgelegte Aktionen für alle Zahlen im Bereich von m bis n durch, im folgenden Fall für alle Zahlen von 1 bis 10:
'Pseudo-Code auf deutsch (kein FreeBASIC-Code!)
TuFürAlleZahlenImBereichVon 1 bis 10
GibAufBildschirmAus <AktuelleZahl> * 2
EndeDerSchleife
Die Ausgabe dieses Konstrukts sähe so aus:
2
4
6
8
...
Sie müssen also nicht für alle 10 Preise einzeln festlegen, dass ihr Wert mal zwei ausgegeben werden soll, sondern können dies für ganze Datenmengen automatisch erledigen lassen und müssen es nur 1x hinschreiben.
In FreeBASIC wird die obige Zählschleife wie folgt umgesetzt:
'Variable für den Index deklarieren. Sie enthält im Verlauf der Schleife
'immer den aktuellen Indexwert und wird daher "Laufindex" genannt.
Dim i As Integer
For i = 1 To 10
Print i * 2
Next i
Sleep ' Auf Tastendruck warten
End
Alle Preise in Ihrem Array könnten Sie also z.B. so addieren:
'Fügen Sie jetzt hier Ihr Preis-Array von eben wieder ein:
DIM Preise(1 TO 10) AS SINGLE
Preise(1) = 1.99
Preise(2) = 10.32
Preise(3) ...
Dim Summe As Single
Dim i As Integer
For i = 1 To 10
Summe = Summe + Preise(i) ' Bisherige Summe mit dem Preis Nr. <i> addieren
' und der Variablen Summe als neuen Wert zuweisen.
Next i
Print "Alle Produkte zusammen kosten: " & Summe
Sleep
End
Gehe zu Seite | Zusätzliche Informationen und Funktionen | |||||||
|---|---|---|---|---|---|---|---|
|
|||||||
Bearbeiten
Versionen