Ergebnis der Suchanfrage

• Forum: Algorithmen, Datenstrukturen und Klassendesign

  AW: Zahlen zerlegen

   
    by Medium, 11. Okt 2013
  Dann aber so:
  
  type
  TDigitPosition = 1..10; // Da sollte die Bereichsprüfung zuschlagen
  TDecimalDigit = 0..9; // Einfach ums abzurunden :D
  
  function getNthDigit(Number: UInt; N: TDigitPosition): TDecimalDigit;
  begin
  Result := (Number div Integer(Power(10, N-1))) mod 10; // Cast ggf. nicht nötig, weiss gerade nicht ob's ne Int-Überladung gibt
  end;