Kundennummer aus Buchstaben und Zahlen erstellen

Thema durchsuchen

Ansicht

Themen-Optionen

Kundennummer aus Buchstaben und Zahlen erstellen

Ein Thema von Voltzi · begonnen am 9. Jun 2005 · letzter Beitrag vom 9. Jun 2005

Vorheriger Beitrag

Nächster Beitrag

alzaimar

(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge

Delphi 2007 Enterprise

Re: Kundennummer aus Buchstaben und Zahlen erstellen

9. Jun 2005, 09:33

Wie lernt man in der Schule zu addieren?

markieren

Code:

			1. Von rechts anfangen. (i=1)

2. Wenn i> Länge(Nummer) dann 

     Hänge ein 'A' vorne an die Nummer an

   Sonst Wenn Nummer[i]=höchste Ziffer dann

     Nummer[i] := Kleinste Ziffer

     inc (i)

     Wiederhole Schritt 2

   sonst

     inc (Nummer[i])

"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")