[Resolvido] diagonal do quadrado

[TCHE 0]

ola pessoal me ajudem

tenho q entrar com o lado de um quadrado e imprimir:

PERIMETRO:

AREA:

DIAGONAL:

 

minha dulvida é na diagonal ñ sei se ta certo

var
ldq : inteiro
perimetro, area, diagonal : real
inicio
escreva ("entre com o lado do quadrado:  ")
leia (ldq)
perimetro := ldq * 4
area := quad(ldq)
diagonal := raizq(2 * area)
escreval ("Perimetro:  ",perimetro)
escreval ("Area:  ",area," M²")
escreval ("Diagonal:  ",diagonal)
fimalgoritmo

[Kandrade 7]

Está certo sim,

 

A diagonal do quadrado pode ser calculado em funcao da área, onde:

d = (2 * A) ^ 1/2

 

ou seja, raiz quadrada de 2 vezes a área.

 

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[TCHE 0]

ja ñ sei mais como agradecer!!!

entao lavai o >>>> obrigado

[Kandrade 7]

Que isso,

sempre que precisa e pudermos ajudar será um prazer.

 

Abraco!

 

ja ñ sei mais como agradecer!!!

entao lavai o >>>> obrigado