Programm Uhrzeit; // Definitionen Benutze Ausgabe, Datum; Definiere Jetzt vom Typ Datum/Uhrzeit, Wdh vom Typ Zahl; // Ablauf Anfang Speicher 0 in Wdh; // Wdh=0; wiederhole Jetzt = Datum.Jetzt; Ausgabe.Ausgeben (Jetzt); Erhöhe Wert von Wdh um 1; // Wdh++ bis (Wdh == 10); Ende;