Pascal/Lazarus-Problem mit while-do/repeat until?

... komplette Frage anzeigen

2 Antworten

Repeat

jahr := jahr + 1;

until isSchaltjahr(jahr);

Antwort bewerten Vielen Dank für Deine Bewertung

Ich kann kein Pascal, aber wenn Du das gegebene Jahr schon hast und außerdem eine Funktion, die herausfindet, ob ein gegebenes Jahr ein Schaltjahr ist, würde ich das mit einer einfachen Schleife machen

nextSchaltJahr = eingegebenesJahr;
while(!isSchaltJahr(nextSchaltJahr)
{
nextSchaltJahr = nextSchaltJahr + 1;
}
Antwort bewerten Vielen Dank für Deine Bewertung

Was möchtest Du wissen?