Buscar Más buscado
Capitulos de este wiki
  1. 1 Introducción
  2. 2 Historia
  3. 3 Manual de referencia
  4. 4 Instalación
  5. 5 Hola Mundo
  6. 6 Elementos del lenguaje
  7. 7 Tipos
  8. 8 Enteros
  9. 9 Enumeraciones
  10. 10 Coma flotante
  11. 11 Coma fija
  12. 12 Arrays
  13. 13 Strings
  14. 14 Registros
  15. 15 Registros discriminados
  16. 16 Registros variantes
  17. 17 Punteros a objetos
  18. 18 Punteros a subprogramas
  19. 19 Tipos derivados
  20. 20 Tipos etiquetados (orientación a objetos)
  21. 21 Subtipos
  22. 22 Objetos (variables y constantes)
  23. 23 Atributos
  24. 24 Expresiones
  25. 25 Operadores
  26. 26 Sentencias y estructuras de control
  27. 27 Subprogramas
  28. 28 Sobrecarga
  29. 29 Entrada/salida
  30. 30 Pragmas
  31. 31 Interfaz con otros lenguajes
  32. 32 Diseño y programación de sistemas grandes
  33. 33 Paquetes
  34. 34 Clausula use
  35. 35 Clausula with
  36. 36 Paquete Standard
  37. 37 Declaraciones
  38. 38 Ámbito
  39. 39 Visibilidad
  40. 40 Renombrado
  41. 41 La biblioteca Ada (unidades y subunidades)
  42. 42 Unidades de biblioteca
  43. 43 Unidades hijas
  44. 44 Subunidades
  45. 45 Compilación separada y dependiente
  46. 46 Tipos abstractos de datos
  47. 47 Tipos limitados
  48. 48 Unidades genéricas
  49. 49 Excepciones
  50. 50 Paquete Ada. Exceptions
  51. 51 Concurrencia
  52. 52 Tareas
  53. 53 Sincronización de tareas mediante puntos de entrada o citas (entry)
  54. 54 Aceptación de citas (accept)
  55. 55 Selección de citas (select)
  56. 56 Llamadas a punto de entrada complejas
  57. 57 Tareas dinamicas: creación dinamica de tareas (tipos t
  58. 58 Dependencia de tareas
  59. 59 Ejemplos de tareas
  60. 60 Programación distribuida con GLADE
  61. 61 Novedades de Ada 2005
  62. 62 Unidades predefinidas
  63. 63 Paquete Ada.Strings.Fixed
  64. 64 Paquete Ada.Strings.Unbounded
  65. 65 Paquete Ada. Text_IO
  66. 66 Paquete Ada.Text_IO.Editing
  67. 67 Paquete Ada. Float_Text_IO
  68. 68 Paquete Ada. Sequential_IO
  69. 69 Paquete Ada. Command_Line
  70. 70 Paquete Interfaces
  71. 71 Recursos en la Web

Curso de Ada - Atributos

23 - Atributos

[editar]
Curso gratis creado por José Alfonso Malo Romero. Extraido de: http://es.wikibooks.org/wiki/Programaci%C3%B3n_en_Ada_/_Introducci%C3%B3n
16 de Marzo de 2006
< anterior | 1 ... 21 22 23 24 25 26 27 ... 71 | siguiente >
Los atributos son operaciones predefinidas que se pueden aplicar a tipos, objetos y otras entidades. Tienen la siguiente sintaxis:

Entidad'Atributo

o bien

Tipo'Atributo(Entidad) ||

Tabla de contenidos

[esconder] ~- 1 Atributos aplicables a tipos ~- 2 Atributos aplicables a objetos ~- 3 Ejemplos ~- 4 Manual de referencia de Ada ||

Atributos aplicables a tipos


Por ejemplo estos son algunos atributos aplicables a tipos:

  • Last: Integer'Last es el máximo valor que puede tomar una variable de un tipo discreto, sea entero o .

  • First: Tipo'First es el mínimo valor que puede tomar una variable de un tipo discreto, sea entero o enumeración.

  • Succ: TColor'Succ(ROJO) indica el siguiente valor a ROJO que toma el tipo TColor, si no existe, se eleva la Constraint_Error.

  • Pred: TDía'Pred(VIERNES) indica el anterior valor a VIERNES que toma el tipo TDía, si no existe, se eleva la excepción Constraint_Error.

  • Pos: El atributo Pos indica la posición ocupada por un determinado valor en un tipo enumeración. Por ejemplo: TColor'Pos(ROJO). La primera posición se considera 0.

  • Val: El atributo Val indica el valor que ocupa una determinada posición en un tipo enumeración. Por ejemplo: COLOR'Val(1).

  • Size: mínimo espacio en bits en que se pueden almacenar objetos de este tipo. Técnicamente se define como lo que ocuparía un componente de un registro de este tipo cuando el registro está empaquetado (pragma Pack).

  • Truncation: El atributo Truncation se usa con la forma X'Truncation(Y), siendo X cualquier tipo flotante e Y una variable de ese tipo. Devuelve el valor truncado de Y a un valor entero.

  • Digits: El atributo Digits representa el número de decimales de la mantisa de un tipo flotante.

  • Ceiling: El atributo Ceiling se usa con la forma X'Ceiling(Y), siendo X cualquier tipo flotante e Y una variable de ese tipo. Devuelve el "techo" de Y, es decir el valor entero más pequeño que es mayor o igual que Y.

  • Rounding: El atributo Rounding se usa con la forma X'Rounding(Y), siendo X cualquier tipo flotante e Y una variable de ese tipo. Devuelve el valor de Y redondeado al entero más cercano. Si Y está exactamente entre dos valores enteros, toma el valor del mayor entero (p.e, Float'rounding(1.5)=2.0)

Atributos aplicables a objetos


Por ejemplo estos son algunos atributos aplicables a objetos:

  • Size: tamaño en bits de un objeto.
  • Valid: si tiene una representación válida para su tipo. Útil cuando se obtienen valores desde el «mundo exterior» mediante Unchecked_Conversion u otro mecanismo.
  • First, Last: aplicados a arrays dan el primer y el último índices del array.
  • Range: Vector'Range indica el rango que ocupa la variable Vector, es decir, equivale a Vector'First..Vector'Last. En el caso de más de una dimensión, el valor Matriz'Range(1) indica el rango de la primera dimensión.

Ejemplos


type Tipo_enumerado is (Enum1, Enum2, Enum3); for Tipo_enumerado'Size use 2; -- Para representar 3 unidades necesitamos 2 bits type Tipo_entero is range -1 .. 5; ... pragma Assert (Tipo_enumerado'Last = Enum3); -- Correcto pragma Assert (Tipo_entero'First = -1); -- Correcto pragma Assert (Tipo_entero'Last = 4); -- ¡¡Incorrecto!! pragma Assert (Tipo_enumerado'Pred( Enum2 ) = Enum1); -- Correcto pragma Assert (Tipo_enumerado'Succ( Enum2 ) = Enum3); -- Correcto type Tipo_flotante is digits 10 range 0.0..100.0; -- 10 cifras decimales en la mantisa Var_Flotante : Float := 1.5; Var_Flotante2 : Float := 1.9; Var_Flotante3 : Float := 1.0; Var_Flotante4 : Float := -1.8; Var_Flotante5 : Float := 1.1; ... pragma Assert (Float'Ceiling(var_Flotante) = 2.0); -- Correcto pragma Assert (Float'Ceiling(var_Flotante2) = 2.0); -- Correcto pragma Assert (Float'Ceiling(var_Flotante3) = 1.0); -- Correcto pragma Assert (Float'Ceiling(var_Flotante3) = 2.0); -- ¡¡Incorrecto!! pragma Assert (Float'Truncation(var_Flotante) = 1.0); -- Correcto pragma Assert (Float'Truncation(var_Flotante2) = 1.0); -- Correcto pragma Assert (Float'Truncation(var_Flotante3) = 1.0); -- Correcto pragma Assert (Float'Truncation(var_Flotante4) = -1.0); -- Correcto pragma Assert (Float'Rounding(var_Flotante5) = 1.0); -- Correcto pragma Assert (Float'Rounding(var_Flotante) = 2.0); -- Correcto A : Character := Character'Val (32) -- A toma el valor de espacio (valor 32 en la tabla ASCII) B : Character := ' '; -- B también toma el valor de espacio Resultado : Natural; ... if not Resultado'Valid then -- 'Resultado' está fuera del rango, con valor negativo Result := Natural'First; end if




Manual de referencia de Ada


[editar]
< anterior | 1 ... 21 22 23 24 25 26 27 ... 71 | siguiente >

Opinar
12 opiniones

LEO

EXCELENTE QUISIERA BAJARLO PARA ESTUDIARLO
wnhjxssjjjaunxasxahqwedqbuxyquwdqd

qwkqwmnwhw wwbwyw wywbwsyw wywvwdwwuw wrwvwjwtsacxanya xyhwtsvabgsx atxnquxvaxc
Estudio psicopedagogia.

Hola en verdad cada aporte me esde gran interes asta para los que no dicen nada, pero en realidad hay que ayudar al mundo, ofrecindole mas que estos aportes, sin odtener nada a canbio ya que nedie quiere el mal para si mismo pero seamos mas humanos y no vemos por nosotros, ayudemos a las personas sin importar raza o lengua y te daras cuenta que tu odtendras ganancias sin hacer daño a nadie educando a los hijos de otros que numca tendran una oportunidad. Tn fe en ti mismo y no para que los demas te veamos, mas sin enbargo para que tu sientas que si eres muy capaz, dejala la relegion aparte, tus titulos, tus vicios, tu avaricia por ser mas grande que el mismo cesar; pero este mundo sin tu ayuda se enfermara pronto. Mirate tu mismo, mira a los presidentes del mundo compitiendo por el tajo mas grando; ellos creen que an ganado, pero no se dancuenta que una persona mas pequeña que ellos en la tierra sin dinero y sin oportuninades podra hacer la diferencia. Vamos azlo por ultimo asi como tu eres, de una forma ipocrita, con mentiras, con rabia omgolpes pero por ultimo te daras cuenta que tus hijos seran los dueños de tu esfuerso y seras muy importante, y tu odio se convertira en algo mas alla de la fe. Dios ayuda asta el mentiroso a adrse cuenta que el es el unico que se daña en esta competencia. Yo soy un hombre con miles de defectos, pero es logico que soy como tu de falso, y espero tu tanbien me ayudes a salir de este mundo de mentiras donde los afectados son tus hijos y los mios. Vamos ayuda tu mundo y este curso tendra sentido grandemente.
No esta mal.

La pena es que no está muy extendido y existen lenguajes mejores.
Me gusta.

Me gustó!.
1 2 3 | siguiente >

Cursos gratis relacionados con 'Curso de Ada'

Curso de Ada
El objetivo de este curso es aprender a programar en el lenguaje Ada, desde sus... Más »
Curso de Linux
Completo curso de Linux, un sistema operativo gratuito y de libre distribución inspirado en el... Más »
Iniciación a Oracle
El más completo curso de Oracle.
Ortografía del español
La ortografía del español.
Una introducción informal a GNU/Linux
Linux es una gran herramienta, la uso desde hace años y se ha convertido en... Más »

Anuncios Google

Autor y licencia de 'Curso de Ada'


Curso gratis de José Alfonso Malo Romero. Extraido de: http://es.wikibooks.org/wiki/Programaci%C3%B3n_en_Ada_/_Introducci%C3%B3n CopyLeft
El contenido está disponible bajo los términos de GNU Free Documentation License
Licencia GNU Free Documentation License: http://www.gnu.org/copyleft/fdl.html
Este contenido ha sido recopilado por el equipo de Wikilearning. Todo el contenido recopilado se ha obtenido respetando y comunicando en nuestro site la licencia de cada fuente.
Wikilearning tiene permiso expreso por escrito de los autores para publicar los contenidos que ha extraído de otras webs, incluyendo su uso comercial.