• Miércoles 24 de Abril de 2024, 18:41

Autor Tema:  Identificador correcto de pascal, no lo consigo.  (Leído 1333 veces)

Mondrast

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Identificador correcto de pascal, no lo consigo.
« en: Domingo 7 de Septiembre de 2008, 16:55 »
0
Bien pues el programa lo que tiene que decir es si el identificador es correcto, el tema es que el compilador me da el error de: operator is not overloaded y no se como corregirlo.
Muchas gracias

Código: Text
  1. PROGRAM identificador;
  2.  
  3. TYPE
  4. mayus='A'..'Z';
  5. minus='a'..'z';
  6. digit='0'..'9';
  7.  
  8. VAR
  9. frase:STRING[255];
  10. mayuscula:mayus;
  11. minuscula:minus;
  12. digitos:digit;
  13. x:CHAR;
  14.  
  15. begin
  16.  
  17. writeln('Mete una frase acabada en punto.');
  18. readln(frase);
  19.  
  20. IF frase[1]=(mayuscula OR minuscula) THEN
  21. begin
  22. IF frase[2]=(mayuscula OR minuscula OR digitos)THEN
  23. Writeln('Identificador correcto');
  24. end
  25. ELSE
  26. writeln('Identificador incorrecto');
  27. end.
  28.  
  29.  

Enko

  • Miembro de PLATA
  • *****
  • Mensajes: 1562
  • Nacionalidad: 00
    • Ver Perfil
Re: Identificador correcto de pascal, no lo consigo.
« Respuesta #1 en: Miércoles 10 de Septiembre de 2008, 17:53 »
0
me parece que tienes un problema con el "or":
Código: Text
  1.  
  2. if  (frase[1] in [mayusculas]) or (frase[1] in [minusculas]) then
  3. begin
  4. end;
  5.  
  6.  

Mondrast

  • Nuevo Miembro
  • *
  • Mensajes: 4
    • Ver Perfil
Re: Identificador correcto de pascal, no lo consigo.
« Respuesta #2 en: Miércoles 10 de Septiembre de 2008, 20:21 »
0
efectivamente, muchas gracias.

Un saludo