Lazarus/Geschachtelte Verzweigungen und Verzweigungen in Schleifen – ZUM-Unterrichten https://unterrichten.zum.de/wiki/Lazarus/Geschachtelte_Verzweigungen_und_Verzweigungen_in_Schleifen
Wir haben jetzt die „Zutaten“ für viele Programme zusammen.
StrToInt(Edit1.Text); if (jahr mod 400 = 0) then label1.Caption:=’Schaltjahr‘ else