Insertar digito 9 pocision 3

[luisgutierrezb]

pues la unit trae este procedimiento:

Procedure CNumeroNatural.InsertarDigito ( Posicion : Byte ; Digito : Byte);

[luisito2011]

ups... y como la uso... pliz

[ecfisa]

Pero Luisito... vos mismo hiciste esa función, se supone que deberías saber como se la llama...

Tomando en cuenta el título: 'Insertar digito 9 pocision 3', creo que sería:

Código Delphi [-]
var
  nn: CNumeroNatural;
begin
  ...
  nn.Valor:= 123456789;
  nn.InsertarDigito(3, 9);
  ...
end;

Un saludo.

[luisito2011]

mm.. si ... toncej se supone que deveria quedar ai
pero me sale error

Código Delphi [-]
 
var
  a: CNumeroNatural;
  x:integer;
begin
a:=cnumeronatural.Crear;
WriteLn('Digite Un Numero'); Readln(x);
A.AsignarValor(x);
WriteLn('Nuevo Numero ',a.InsertarDigito(3,9));
readln;

Creo que es.. la forma como llamo.. aver si me corrigen
saludos

[ecfisa]

Hola Luisito.

Creo que deberías mostrarlo así:

Código Delphi [-]
var
  a: CNumeroNatural;
  x:integer;
begin
  a:=cnumeronatural.Crear;
  WriteLn('Digite Un Numero'); Readln(x);
  A.AsignarValor(x);
  a.InsertarDigito(3,9); 
  WriteLn('Nuevo Numero ',a.ObtenerValor);
  readln;

Un saludo.

[[duilioisola]]

Creo que es.. la forma como llamo.. aver si me corrigen

mm.. si ... entonces(no era una palabra) se supone que debería(con B) quedar así(tampoco era una palabra)
pero me sale un error

Código Delphi
[...]

Creo que es la forma como llamo a la función. A ver (con espacio, son dos palabras) si me corrigen