(* Beispiel für einen Algorithmus *)
(* Umwandlung von Oktalzahlen in Dezimalzahlen *)
(* Die Oktalzahl stehe in der Variablen x *)

potenz = 1;                       (* aktuelle 8er Potenz *)
dezimal = 0;                      (* Ergebnis / Dezimal *)

while (x>0) {
    x = x / 10;                   (* letzte Ziffer abspalten*)
    digit = 10 * (x - int(x));    (* int()= größtes Ganzes *)
    dezimal = dezimal + (digit * potenz);
    x = int(x);
    potenz = potenz * 8;
}
Ausgabe(dezimal);                 (* gib das Ergebnis aus *)