Ada reserved words

abort      abs       accept       access     all      and
array      at        begin        body       case     constant
declare    delay     delta        digits     else     elsif
end        entry     exception    exit       for      function
generic    goto      if           in         is       limited
loop       mod       new          not        null     of
or         others    out          package    pragma   private
procedure  raise     range        record     rem      renames
return     reverse   select       separate   subtype  task
terminate  then      type         use        when     while
with       xor

Pre-defined words

BOOLEAN    CHARACTER    CLOSE       CREATE      DELETE
FALSE      FLOAT        GET         INTEGER     NATURAL
NEW_LINE   OPEN         PUT         PUT_LINE    POSITIVE
READ       RESET        SKIP_LINE   STRING      TEXT_IO
TRUE       WRITE