Preciso fazer um código para calcular o peso ideal de homens e mulheres, mas o professor disse que eu preciso fazer somente usando SE-ENTAO, e deixar o SENAO de fora, dai toda fez que eu executo esse programa o primeiro ESCREVAL depois do SE da erro de sintaxe ESCREVAL ("Seu peso ideal é: ", peso_i)
, esse aqui, E
e tudo isso em portugol o que me buga mais ainda
Segue o meu codigo:
Algoritmo "peso_ideal"
Var
peso_i, altura: real
sexo: caractere
Inicio
TIMER (500)
ESCREVAL ("------------------------------------------------------------------")
ESCREVA ("Por favor informe seu sexo como F(feminino) e M (masculino): ")
LEIA (sexo)
ESCREVA ("Informe sua altura: ")
LEIA (altura)
SE (sexo = "M") ou (sexo = "m") ENTAO
(peso_i) <- (450,7 * altura) / 10
ESCREVAL ("Seu peso ideal é: ", peso_i)
fimse
SE (sexo = "F") ou (sexo = "f") ENTAO
(peso_i) <- (400,7 * altura) / 10
ESCREVAL ("Seu peso ideal é: ", peso_i)
fimse
SE (sexo <> "F") ou (sexo <> "f") ou (sexo <> "M") ou (sexo <> "m") ENTAO
ESCREVAL ("Por favor insira um sexo valido com F ou M")
fimse
ESCREVAL ("------------------------------------------------------------------")
Fimalgoritmo