Ir ao conteúdo

VISUALG - Estou com dificuldade..rsrs


mjfrancobru

Posts recomendados

Postado

Olá Pessoal,

Estou iniciando e tenho uma duvida, tenho que montar um algoritmo que leia o sexo e altura da pessoa para calcular seu peso ideal. Usei o comando SE e o comando CASO(escolha)....mas num da certo!!! Se alguem puder me dar uma dica abaixo o meu raciocinio..rsrs

var

sexo:caracter

h,r:real

inicio

Escreval("Digite seu sexo(feminino/masulino):-")

Leia(sexo)

Escreval("Digite sua altura:-")

Leia(h)

Se sexo<-feminino então

r<-62.1*h Escreval("Seu peso ideal é:- ",r)

senao

r<-72.7*h Escreval("Seu peso idel é:- ",r)

Fimse

fimalgoritmo

Obrigado

msn: [email protected]

Postado
var
sexo:caracter
h,r:real
inicio

Escreval("Digite seu sexo(feminino/masulino):-")
Leia(sexo)

Escreval("Digite sua altura:-")
Leia(h)

[COLOR="Red"]Se sexo = "feminino" então
r<-62.1*h Escreval("Seu peso ideal é:- ",r)[/COLOR]

senao
r<-72.7*h Escreval("Seu peso idel é:- ",r)
Fimse

fimalgoritmo

Postado

ta ai correto

algoritmo "Peso ideal"
// Função :
// Autor :JhOnE RoSsInI
// Data : 22/10/2010
// Seção de Declarações
var
sexo:caracter
h,r:real
inicio
// Seção de Comandos
escreva("Informe o sexo Masculino/Feminino: ")
leia(sexo)
escreva("Informe a altura: ")
leia(h)

se ((sexo = "Masculino") ou (sexo = "masculino")) então

r <- 72.7 * h

fimse

se ((sexo = "Feminino") ou (sexo = "feminino")) então

r <- 62.1 * h

fimse

escreva("Seu peso ideal é: ", r)
fimalgoritmo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

LANÇAMENTO!

eletronica2025-popup.jpg


CLIQUE AQUI E BAIXE AGORA MESMO!