algoritmo "hipotenusa de um triangulo"// Funcao :// Autor :Paulo gama// Data : 7/9/2010// Secao de Declaracoes var b1, b2, b3 : numericoinicioescreval ("cateto oposto ")leia (b1)escreval ("cateto adja. ")leia (b2) b3 <- raizq(b1^2 +b2^2) ://valor da hipotenusaescreval (" o valor da hipoitenusa eh ", b3)// Secao de Comandos fimalgoritmo Inicio da execucaodigite nota 1:8digite nota 2:9digite nota 3:6a media eh ? 7.66666666666667Fim da execucao.Inicio da execucao*****calculo de area******qual e o valor da base?19qual valor da altura?29a area desse triangulo eh igual a 275.5******************fim*************Fim da execucao. algoritmo "hipotenusa de um triangulo"// Funcao :// Autor :Paulo gama// Data : 7/9/2010// Secao de Declaracoes var b1, b2, b3 : numericoinicioescreval ("cateto oposto ")leia (b1)escreval ("cateto adja. ")leia (b2) b3 <- raizq(b1^2 +b2^2) ://valor da hipotenusaescreval (" o valor da hipoitenusa eh ", b3)// Secao de Comandos fimalgoritmoInicio da execucaocateto oposto 30cateto adja. 60 o valor da hipoitenusa eh 67.0820393249937Fim da execucao. lgoritmo "cateto oposto"// Funcao :// Autor :// Data : 7/9/2010// Secao de Declaracoes var b1, b2, b3 : numericoinicioescreval ("cateto hipotenusa ")leia (b1)escreval ("cateto adja. ")leia (b2) b3 <- raizq(b1^2 - b2^2) ://valor do cateto opostoescreval (" o valor da cateto oposto eh ", b3)// Secao de Comandos fimalgoritmoInicio da execucaocateto hipotenusa 67.082039cateto adja. 60 o valor da cateto oposto eh 29.999999273292Fim da execucao. Inicio da execucaoentre com o nomePaulo Henrique gamaentre com as notas das tres provas 9.58.79 a media harmonica ponderada de Paulo Henrique gama e 8.97556561085973Fim da execucao. algoritmo "cateto adja."// Funcao :// Autor :// Data : 7/9/2010// Secao de Declaracoes var b1, b2, b3 : numericoinicioescreval ("cateto hipotenusa ")leia (b1)escreval ("cateto oposto ")leia (b2) b3 <- raizq(b1^2 - b2^2) ://valor do cateto adja.escreval (" o valor da cateto adja. eh ", b3)// Secao de Comandos fimalgoritmoInicio da execucaocateto hipotenusa 67.082039cateto oposto 30 o valor da cateto adja. eh 59.999999636646Fim da execucao. Eu digo, seu mocoTraz o cafePra me despertar a almaSaliente, palpitanteEsta noite fui ao ceuTe contar, que estive laAquele sorriso me remeteSe intromete, intercepta meu quererVoraz, do alto contemploA figura da perfeicao, meio disformeDe fazer chorar, de tirar o arDe querer amarDe parar o marDecolei, como nos filmesComo em pilequeComo o moleque da pipa,do cerolE pude sentir o afago das estrelasO aconchego dos invernosA paz do beira-marA tristeza me esqueceuPrimavera me aqueceuBulico de prazeresReves ideologicaAndo confusamente felizSonhando ao meio diaDeixa o cafe, mocoJa preciso irTentar descobrir o meuCombinado ao delaTe contar, que volto laMas so depois do carnaval De manha, os passarosele abre os olhoslentamentebraco esquerdo dormentelanca sobre o teto um suspiro aliviadocheio de dorescheio de amoresa noite fora escuraa alma vencida lanca o corpo pra fora da cama cheiro de cafe frescocheiro de dia ruimna mente, turbilhao de maliciana xicara, cafe preto dizia:- desperta.era amargo, era forteera libertador e, adocante: nao tinha. Hoje me lancei a alvura, mutilado pelo acordarDe anseios a flor da peleRispida, a lutar contra os raios de solMatinais, que outrora bem vindosAssim me via, dissimulado desejo, lhanoSe debatendo no profundo, no profanoPercebia, nao e bom sonharCom o que meus bracos nao podem alcancarMas, por oraA gente se via, durante a noiteA gente fugia por