BEGINN GIB "Gib eine Zahl ein: " AUS LESE zahl EIN umgekehrt = 0 WÄHREND zahl > 0 ziffer = zahl MOD 10 umgekehrt = umgekehrt * 10 + ziffer zahl = zahl / 10 ENDE GIB "Umgekehrte Zahl: " umgekehrt AUS ENDE
BEGINN GIB "Gib eine Zahl ein: " AUS LESE n EIN faktor = 2 WÄHREND n > 1 WENN n MOD faktor = 0 DANN GIB faktor AUS n = n / faktor SONST faktor = faktor + 2 ENDE WENN ENDE ENDE