Zum Inhalt springen
View in the app

A better way to browse. Learn more.

Fachinformatiker.de

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

Empfohlene Antworten

Veröffentlicht

Hi liebe Fachinformatiker.de Community,

wir nehmen z.Z. in der Schule Arrays durch (und Bubblesort) und schreiben darüber eine Klausur, nur haben wir erst 2 Übungsaufgaben gemacht und bin daher noch ein wenig unsicher...

Habt ihr noch Aufgaben zum üben für mich? Habe schon zur eigenen Übung ein "Schiffe-versenken-Spiel" und ein Puzzle/Memory-Spiel programmiert (wir programmieren in VBA).

Das haben wir schon programmiert:

Ein Formular mit verschiedenen Buttons: Der 1. um eine bestimmte Anzahl an Namen einzugeben, der 2. um sie auszugeben, der 3. um den Schülernamen per "Schülernummer" (Array-Index) ausgeben zu lassen, den 4. um die Schülernummer per Schülernamen ausgeben zu lassen und den 5. um sie geordnet nach dem Alphabet auszugeben (mit Bubblesort).


Option Compare Database

Option Explicit

Dim schüler(1 To 5) As String


Private Sub btnNew_Click()

Dim i As Integer


For i = 1 To 5

    schüler(i) = InputBox("Geben Sie den ersten Schüler an")

Next i

End Sub


Private Sub btnAusgabeListe_Click()

Dim i As Integer


For i = 1 To 5

    MsgBox (schüler(i))

Next i


End Sub


Private Sub btnAusgabeNummer_Click()

Dim i As Integer, bla As String


bla = InputBox("Geben Sie die Schülernummer ein")


For i = 1 To 5

    If bla = i Then

        MsgBox (schüler(i))

    End If

Next i


End Sub


Private Sub btnlöschen_Click()

Erase schüler()

End Sub


Private Sub btnSchülername_Click()

Dim i As Integer, x As String


x = InputBox("Geben Sie den Namen ein")


For i = 1 To 5

    If x = schüler(i) Then

        MsgBox (x & " ist in der Liste")

    End If

Next

End Sub

Wenn du mathematisch davon Ahnung hast, kannst du etwas aus der Matrizenrechnung machen (Addition, Determinanten etc.) oder etwas im Bereich der Kugelspiele.

z.B. man hat ein 10*10 Felder Spielfeld, darauf werden zufällig 50 schwarze und 50 weiße Steine verteilt. Nun wird mit zwei 10er Würfeln eine Koordinate dieses Spielfeldes erwürfelt. Trifft man hierbei ein Feld auf dem ein weißer Stein ist, wird ein beliebiger schwarzer Stein entfernt und durch einen weiteren weißen ersetzt. Trifft man hierbei ein Feld auf dem ein schwarzer Stein ist, wird ein bel. weißer Stein durch einen schwarzen ersetzt.

Dann würfelt man wieder neu usw.

Erstelle ein Konto oder melde dich an, um einen Kommentar zu schreiben.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.