LANCAMENTOPROJETIL

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

Algoritmo "lancamentoprojetil"
Var r, d, h, resultado:real
Inicio
 escreval("Entre com a distância horizontal entre o canhão e o cume (R):")
 leia(r)
 escreval("Entre com depressão de profundidade (d) atrás da montanha:")
 leia(d)
 escreval("Entre com a altura da montanha (h):")
 leia(h)
 
 resultado <- r*(1+(1+d/h)^(1/2))
 escreval("A distância horizontal entre o ponto de lançamento e o ponto onde se encontra o grupo inimigo é de:", resultado)
Fimalgoritmo