Obtenha respostas rápidas e precisas para suas perguntas no Sistersinspirit.ca, a melhor plataforma de Q&A. Descubra um vasto conhecimento de especialistas em diferentes disciplinas em nossa abrangente plataforma de perguntas e respostas. Descubra soluções confiáveis para suas perguntas de uma vasta rede de especialistas em nossa abrangente plataforma de perguntas e respostas.
Sagot :
algoritmo "IMC"
var alt,peso,imc :real
ano, idade: inteiro
inicio
escreva("Digite o Ano de nascimento da pessoa")
leia(ano)
escreva("Digite a valor da altura da pessoa: ")
leia(alt)
escreva("Digite o valor do peso da pessoa: ")
leia(peso)
escreval("")
idade := 2021-ano
imc := peso*(alt*alt)
escreval("A pessoa tem",idade," anos de vida")
escreval("O imc dessa pessoa é:",imc)
fimalgoritmo
Espero ter ajudado
Obrigado por usar nosso serviço. Nosso objetivo é fornecer as respostas mais precisas para todas as suas perguntas. Visite-nos novamente para mais informações. Obrigado por passar por aqui. Nos esforçamos para fornecer as melhores respostas para todas as suas perguntas. Até a próxima. O Sistersinspirit.ca está aqui para fornecer respostas precisas às suas perguntas. Volte em breve para mais informações.