AdaPOR QUE ESSE NOME? O nome Ada uma homenagem a condessa de Lovelace, Augusta Ada Byron, flha de Lord Byron que trabalhou com Charles Babbage e considerada como a primeira programadora de computadores da HistriaO QUE ADA?Ada uma linguagem de programa!"o de alto n#vel e imperativa baseada em $ascal e criada atravs de um concurso reali%ado pelo &' (epartament o) (e)ense *(o(+ sendo o principal pro,etista da equipe o )ranc-s .ean /chbiah 0sse concurso )oi )eito para por ordem na situa!"o, o (o( em 1234 usava cerca de 456 linguagens ou dialetos de programa!"o A linguagem )oi primeiramente padroni%ada em 1278 pelo A9'/ e em 1275 a Organi%a!"o /nternacional de $adrono%a!"o */'O+ )e% uma padroni%a!"o semelhante e em 1225 a /'O padroni%ou uma nova vers"o melhoradaO QUE ADA?'entia:se que as ;666 ou mais linguagens de programa!"o em uso naquele momento poderiam ser substitu#das em grande parte por uma linguagem bem plane,ada para uso em sistemas de are Avers"o de 1278 da linguagem )oi chamada de Ada durante anos (esde que a vers"o mais nova pretende substituir a vers"o original, ela tambm chamada AdaADA UMA LINGUAGEM GRANDEAda )oi desenvolvida para ser mais do que apenas mais uma linguagem de programa!"o, ,? que ela inclui muitos dos princ#pios modernos de engenharia de so)t>are $or e@emplo, o conceito de oculta!"o de in)orma!"o )oi inserido na linguagem ao invs de ser implementado como uma tcnica de programa!"o tambm )oi )eita para o desenvolvimento de grandes sistemas especialmente apropriada para uso em equipeADA UMA LINGUAGEM GRANDEIDENTIFICADORES&m identifcador qualquer ob,eto em Ada e deve ser )ormado seguindo algumas regras bastante r#gidas &m identifcador tem que come!ar com uma letra do al)abeto e pode ser )ormado de letras, nAmeros e underlines, contanto que n"o ha,am underlines duplos ou triplos e assim por diante e que ele n"o se,a o Altimo caracter IDENTIFICADORESAda n"o Bcase:sensitiveC 9"o podem ser usados espa!os em branco ou caracteres especiais como parte de um identifcadorD dese,?vel que os identifcadores se,am signifcativosPALAVRAS RESERVADASAda 25 usa E2 palavras reservadas *Ada 78 s tinha E8 palavras reservadas+ O uso de palavras reservadas simplifca o enorme trabalho de )a%er um compilador para AdaA seguir est"o as palavras reservadas *ignorando distin!Fes de upperGlo>er case+HPALAVRAS RESERVADASabortabsabstractaccetaccessa!"ase#a!!a$#arra%atbe&"$bo#%caseco$sta$t#ec!are#e!a%#e!ta#"&"ts#oe!see!s"(e$#e$tr%e)cet"o$e)"t(or(*$ct"o$&e$er"c&oto"("$"s!"+"te#!oo+o#$e,$ot$*!!o(orot-erso*tac.a&era&+ar"/ateroce#*rerotecte#ra"sera$&erecor#re+re$a+esre0*e*eret*r$re/ersese!ectsearates*bt%eta&&e#tas.ter+"$atet-e$t%e*$t"!*se,-e$,-"!e,"t-)or0strutura B?sica--Declaracoes de bibliotecasProcedure nome_do_programa is--Declaracoes de variaveisbegin--Corpo do programa com as instrucoes e calculosend nome_do_programa;Obs: Todo e qualquer comentrio iniciado com dois traos seguidos !--" e terminam no #im da lin$a%O Comando /)i) condicao thensequencia de comandos *e@ecutada se a condi!"o verdadeira+elseoutra sequencia de comandos *e@ecutada se a condi!"o )alsa+end i)IO Comando /) : 0@emploJith te@tK/OI &se te@tK/OIJith Ada/ntegerKKLineI i) @Ny then$utKLine*LO $rimeiro valor digitado eO maiorPL+Ielsi) @Qy then$utKLine*LO 'egundo valor digitado eO maiorPL+Ielse$utKline*LOs dois valores s"o iguaisL+Iend i)I9e>KLine*8+I end usandoKi)IOs comandos Ror, Jhile e LoopJith te@tK/OI &se te@tK/OIJith Ada/ntegerKKLine*8+I )or a in 18 loop $utKLine*L&sando o Comando Ror em AdaL+Iend loopI9e>KLine*8+Ia HS 1I>hile a GS5 loop $utKLine*L&sando o Comando Jhile em AdaL+Ia HS a T 1Iend loopI9e>KLine*8+Ia HS 1Iloop $utKLine*L&sando o Comando Loop em AdaL+Ie@it >hen aS5Ia HS a T 1Iend loopI9e>KLine*8+Iend usandoK)orK>hileKloopIUuem usaV(epartamento de de)esa dos 0&AA linguagem Ada ho,e em dia a muito utili%ada nos sistemas de armamento e seguran!a nacional dos 0stados &nidos $orm tambm possui sistemas n"o:militares Uuem usaV9a es)era comercial, vem sendo utili%ado em sistemas fnanceiros, de transporte metrovi?rio e de avia!"o, assim como tambm em sistemas espaciais o? LOCAL4 E#"tora A##"so$:@es!e%? DATA6 B&=9', A Co$c*rre$c% "$ A#a6 8< E#"=>o? Ne, Aor.4 Ca+br"#&e U$"/ers"t% Press? B99C6 L0(MA=(, H ADA D U+a "$tro#*=>o6 R"o #e Ea$e"ro4 E#"tora Ca+*s? B9C56 '0B0'o6 F< E#"=>o? Porto A!e&re4 2oo.+a$? 8;;;6 JA