Algoritmo para verificar o tipo do Triangulo"
==============================================================
// Seção de Declarações
var
ladoA,ladoB,ladoC:real
inicio
// Seção de Comandos
escreval("Entre com lado do triangulo ")
leia(ladoA)
escreval("Entre com lado do triangulo ")
leia(ladoB)
escreval("Entre com lado do triangulo ")
leia(ladoC)
se ((a < b+c) e (b
se (a=b) e (b=c)
entao
escreval("Triângulo Equilátero ")
senao
se (a=b) ou
(b=c) ou (a=c) entao
escreval("Triângulo Isósceles ")
senao
escreval("Triângulo Escaleno ")
fimse
fimse
senao
escreval("Não e possível formar um triângulo")
fimse
fimalgoritmo
Nenhum comentário:
Postar um comentário