Faca um algoritmo que receba como entrada as medidas dos dois...

var

catAdj, catOpo, hipo, area: real

inicio

// Seção de Comandos  

escreva("Digite um valor para o Cateto Adjacente: ")

leia(catAdj)

escreva("Digite um valor para o Cateto Oposto: ")

leia(catOpo)

catAdj := exp(catAdj,2)

catOpo := exp(catOpo,2)

hipo := catAdj + catOpo

hipo := raizq(hipo)  

escreval("O valor da Hipotenuse é: ", hipo)  

area := (catAdj * catOpo) / 2

escreva("A ár