Ayuda con un ejercicio

[luisito2011]

Empezado por luisito2011

x:=mayor(N1,N2);
a.asignarvalor(x);
x:=Mayor(a,n3);

donde esta rojo.. es donde me sale error
..(E2003 undeclared identifier:'Mayor')

[ecfisa]

Hola Luisito2011.

El error te lo genera por que estas llamando a un método sin indicar el objeto al que está asociado.

Mirá los cambios en rojo:

Código Delphi [-]
var
  A,n1,n2,n3:cnumeronatural;
  x :integer;
begin
  n1:= CnumeroNatural.crear;
  n2:= CnumeroNatural.crear;
  n3:= CnumeroNatural.crear;
  A := CNumeroNatural.Crear;
  Write('Digite un numero N1:'); 
  Readln(x);
  n1.AsignarValor(x);
  Write('Digite un numero N2:'); 
  Readln(x);
  n2.AsignarValor(X);
  Write('Digite un numero N3:'); 
  Readln(x);
  N3.AsignarValor(X);
  x:= A.Mayor(N1,N2);
  A.Asignarvalor(x);
  x:= A.Mayor(a,n3);
  Write('El mayor es ');
  if N1.ObtenerValor = x  then writeln('N1')
   else if N2.ObtenerValor = x  then writeln('N2')
     else writeln('N3');
  readln;
end.

Un saludo.

[luisito2011]

miechi... bueno eso del a:=cnumeronatural.crear;
me olvide copiarlo.. bueno lo unico que no entiendo ..
por que es ''A.mayor''...
si me lo explicara porfa....

[ecfisa]

Empezado por luisito2011

miechi... bueno eso del a:=cnumeronatural.crear;
me olvide copiarlo.. bueno lo unico que no entiendo ..
por que es ''A.mayor''...
si me lo explicara porfa....

Hola Luisito2011.

A diferencia de una función o procedimiento, para llamar a un método es preciso hacer referencia al objeto asociado (como te mencioné arriba).
Un método es una subrutina asociada o a una clase (método de clase) o a un objeto (método de instancia).

Como en tu código original tenías declarada la variable 'A' de tipo CNumeroNatural sin utilizar, la aproveché para poder llamar al método 'Mayor' y
sólo para eso. Pero podría haber sido cualquier otra del mismo tipo.
Lo que no podés hacer, es utilizar el método 'Mayor' sin una instancia de CNumeroNatural, ya que en la declaración de tu código, la función 'Mayor'
no existe fuera de ella.


Un saludo.