algoritmo "Cálculo de área"
// Função :
// Autor :
// Data : 07/09/2018
// Seção de Declarações
var
medidas:vetor[1..5] de real
largurat,comprimentop, desconto, V: REAL
r: INTEIRO
resposta:caractere

inicio
repita

escreval("sua parede possui portas ou janelas? 1 para sim e 2 para nao")
leia(desconto)
se(desconto = 1)entao
escreval("desconte o valor de portas e/ou janelas")
senao
escreval ("nao tem necessidade de desconto")
fimse

escreval("digite a largura e a altura de sua parede em metros")
leia(medidas[1])
leia(medidas[2])
V<-(medidas[1]*medidas[2])/5
escreval("o volume de tinta necessário em litros é:", V)
escreval("Deseja calcular novamente?(sim ou nao)")
leia(resposta)
ate resposta="nao"

// Seção de Comandos
fimalgoritmo