Una parte de declaraciones está formada por una secuencia de declaraciones.
declarative_part ::= {declarative_item} declarative_item ::= basic_declarative_item | body basic_declarative_item ::= basic_declaration | aspect_clause | use_clause body ::= proper_body | body_stub proper_body ::= subprogram_body | package_body | task_body | protected_body
type Semana is (Lun, Mar, Mie, Jue, Vie, Sab, Dom); subtype Laborables is Semana range Lun .. Vie; subtype Natural is Integer range 0 .. Integer'Last; subtype Vector_Rest is Vector_Libre (1 .. 10); Count, Sum : Integer;
Size : Integer range 0 .. 10_000 := 0;
Hoy : Semana;
Color_Table : array(1 .. Max) of Color; Limit : constant Integer := 10_000;
Low_Limit : constant Integer := Limit/10;