Nenhuma resposta neste tópico

[lilou]

criei esta calculadora, mas tenho de incluir uma nova etapa de calcular o imc
procedimento ? como fazer ?

algoritmo "semnome"
var
vet: vetor[1..20] de inteiro
count,num_pares,soma_pares: inteiro
inicio
para count de 1 ate 20 faca
escreva("Posição",count," do vetor: ")
leia(vet[count])
fimpara
para count de 1 ate 20 faca
se vet[count] mod 2 = 0 entao
num_pares<- num_pares + 1
se num_pares <= 3 entao
soma_pares <- soma_pares + vet[count]
fimse
fimse
fimpara
escreval
escreval("A quantide de numeros pares é", num_pares)
escreval("A soma dos três primeiros números pares é", soma_pares)
fimalgoritmo