Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Jahreszahlen in Array einlesen, an Funktion umleiten, berechnen und ausgeben
Autor: Sloorg
Datum: 20.06.14 18:32
Hallo Leute, ich stehe vor folgender Aufgabe: Schreiben Sie eine Funktion istSchaltjahr(), die den Rückgabewert true zurückgibt, falls die ihr übergebene positive ganze Jahreszahl ein Schaltjahr ist. Im anderen Fall – auch wenn die Zahl negativ ist – wird false zurückgegeben. Hier die Definition für Schaltjahre: Ein Jahr ist ein Schaltjahr, wenn die Jahreszahl durch 4 oder 400 teilbar ist. Ist die Jahreszahl nur durch 100, nicht durch 400 teilbar, so liegt kein Schaltjahr vor. OK, die Funktion habe ich hier: Imports System.Console Module Module1 Sub Main() Dim ijahr As Integer Write("Bitte geben Sie eine Jahreszahl ein: ") ijahr = ReadLine() WriteLine(schaltjahr(ijahr)) Warten() End Sub Function schaltjahr(ByVal ijahr As Integer) Dim istSchaltjahr As String If ijahr Mod 4 = 0 Then If ijahr Mod 100 = 0 Then If ijahr Mod 400 = 0 Then istSchaltjahr = "Die eingegebene Jahreszahl " _ & "ist ein Schaltjahr" Else istSchaltjahr = "Die eingegebene Jahreszahl " _ & "ist kein Schaltjahr" End If Else istSchaltjahr = "Die eingegebene Jahreszahl " _ & "ist ein Schaltjahr" End If Else istSchaltjahr = "Die eingegebene Jahreszahl ist " _ & "kein Schaltjahr" End If Return istSchaltjahr End Function Sub Warten() Write("Bitte EINGABE drücken: ") ReadLine() End Sub End Module Aber jetzt kommt’s: Testen Sie Ihre Funktion innerhalb einer angemessenen main-Methode. Diese ermöglicht die Eingabe von bis zu 5 Zahlen, die danach auf ihre Schaltjahr-Eigenschaft geprüft werden. Jede eingegebene Zahl und das Prüfergebnis werden dann ausgegeben: Beispiel: // Es wurde 1880, 1966, 2000, 1700, 1999 eingegeben Ausgabe: Das Jahr 1880 ist ein Schaltjahr Das Jahr 1966 ist kein Schaltjahr Das Jahr 2000 ist ein Schaltjahr Das Jahr 1700 ist kein Schaltjahr Das Jahr 1999 ist kein Schaltjahr Wie kann ich das umschreiben, dass 5 Jahreszahlen in ein Array eingelesen werden? main macht: Schleife mit Werten einlesen Schleife die den Wert und die Info, ob Schaltjahr (aufgrund des Funktionsaufrufs) ausgibt. Für die Funktion brauchen Sie dann eher if... Hat jemand vllt. eine Idee? Vielen Dank im voraus, Sloorg. B)

Jahreszahlen in Array einlesen, an Funktion umleiten, berech...	2.697	Sloorg	20.06.14 18:32
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	2.023	Kuno60	21.06.14 01:21
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.797	Sloorg	21.06.14 04:53
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.799	Kuno60	21.06.14 12:19
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.811	Sloorg	22.06.14 01:44
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.755	Kuno60	22.06.14 11:56
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.773	Sloorg	22.06.14 20:24
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.763	Sloorg	22.06.14 20:31
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.917	Kuno60	24.06.14 16:08
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.866	GPM	24.06.14 17:48
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.832	Kuno60	24.06.14 18:28
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.750	Sloorg	26.06.14 06:45
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.905	Sloorg	26.06.14 06:43
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.736	Sloorg	26.06.14 06:41
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.864	sv00010	21.06.14 11:48
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.912	DaveS	21.06.14 12:16
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.851	Sloorg	22.06.14 01:46
Übung für SLOORG	1.812	Manfred X	23.06.14 08:37
Re: Übung für SLOORG	1.724	Sloorg	26.06.14 06:48
Hilfestellung	1.766	Manfred X	26.06.14 07:49
Re: Hilfestellung	2.125	Sloorg	02.07.14 00:00

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen