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.591	Sloorg	20.06.14 18:32
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.776	Kuno60	21.06.14 01:21
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.703	Sloorg	21.06.14 04:53
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.718	Kuno60	21.06.14 12:19
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.734	Sloorg	22.06.14 01:44
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.676	Kuno60	22.06.14 11:56
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.689	Sloorg	22.06.14 20:24
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.696	Sloorg	22.06.14 20:31
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.793	Kuno60	24.06.14 16:08
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.779	GPM	24.06.14 17:48
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.751	Kuno60	24.06.14 18:28
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.663	Sloorg	26.06.14 06:45
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.833	Sloorg	26.06.14 06:43
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.660	Sloorg	26.06.14 06:41
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.780	sv00010	21.06.14 11:48
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.798	DaveS	21.06.14 12:16
Re: Jahreszahlen in Array einlesen, an Funktion umleiten, be...	1.715	Sloorg	22.06.14 01:46
Übung für SLOORG	1.718	Manfred X	23.06.14 08:37
Re: Übung für SLOORG	1.642	Sloorg	26.06.14 06:48
Hilfestellung	1.680	Manfred X	26.06.14 07:49
Re: Hilfestellung	1.945	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