Faça um algoritmo utilizando o Visual G que leia 3 valores inteiros e positivos e verifique se eles formam ou não um
triângulo - para formar um triângulo cada um de seus lados deve ser menor que a soma dos
outros dois. Se for um triângulo, indique de que tipo é: equilátero (três lados iguais), escaleno
(três lados diferentes) ou isósceles (dois lados iguais e um diferente).
Questão 02 (1,5 pontos)
A Companhia de pulverização Mata Tudo Ltda. utiliza aviões para pulverizar lavouras.
Os custos de pulverização dependem do tipo de praga e da área contratada conforme
segue:
◦ Tipo 1: pulverização contra ervas daninhas, R$500,00 por hectare;
◦ Tipo 2: pulverização contra gafanhotos, R$1.000,00 por hectare;
◦ Tipo 3: pulverização contra broca, R$1.500,00 por hectare.
Se a área a ser pulverizada é maior do que 1000 hectares, o fazendeiro recebe um
desconto de 5%. Além disso, qualquer fazendeiro cujo custo ultrapasse R$750.000,00
recebe um desconto de 10% sobre o valor. Se ambos os descontos se aplicam,
aquele relacionado à área deve ser calculado em primeiro lugar.
Utilize a estrutura de seleção ESCOLHA para fazer a seleção do tipo de praga.
Soluções para a tarefa
Oi!
Logo abaixo, temos um exemplo de algoritmo utilizando o Visual G que leia 3 valores inteiros e positivos e verifique se eles formam ou não um triângulo. A partir de sua estrutura, perceba que você pode se basear para construir o seu próprio algoritmo, caso queira fazer alguma modificação.
algoritmo "Tipo de triangulo"
var
l1, l2, l3: real
inicio
escreval("Digite o lado 1 do triângulo: ")
leia(l1)
escreval("Digite o lado 1 do triângulo: ")
leia(l2)
escreval("Digite o lado 1 do triângulo: ")
leia(l3)
se(l1 = l2) e (l2 = l3) entao
escreval("O triângulo é equilátaro")
senao
se(l1 <> l2) e (l1 <> l3) e (l2 <> l3) entao
escreval("O triângulo é escaleno")
senao
se(l1 = l2) ou (l1 = l3) ou (l2 = l3) entao
escreval("O triângulo é isósceles")
fimse
fimse
fimse
fimalgoritmo