Obtener determinado dígito de un número

[champy]

Se me ocurre uno aún más corto.

Código Delphi [-]
Function ObtenerNumero(Numero: Integer; Posicion: Integer): Integer;
begin
  Result := StrToInt(Copy(IntToStr(Numero), Posicion, 1));
end;

[ecfisa]

Hola champy.

Correcto y más simple además.

En la programación práctica, no dudaría en manipular cadenas para obtener la posición o parte de un número. Pero por la forma en que xneox, presentó su código, me dió la impresión que el catedrático solicita una manipulación numérica de los dígitos, de allí la parafernalia de los mod y div .

Saludos

[champy]

Aiins! Estos catedráticos y sus manías...

[[Delphius]]

Empezado por champy

Aiins! Estos catedráticos y sus manías...

Empezado por ecfisa

Hola champy.

Correcto y más simple además.

En la programación práctica, no dudaría en manipular cadenas para obtener la posición o parte de un número. Pero por la forma en que xneox, presentó su código, me dió la impresión que el catedrático solicita una manipulación numérica de los dígitos, de allí la parafernalia de los mod y div .

Saludos

Otro hilo más que avala mi postura: si el profe te da manzanas, piensa en manzanas

De manía nada. Es útil para condicionar al estudiante a que razone más; que lo trabaje más al código y al cerebro.

Saludos,

[Casimiro Noteví]

No olvides nuestra guía de estilo, gracias por tu colaboración