adivinha idade 2-1

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

Algoritmo "adivinha idade"
// Disciplina : [Linguagem e técnicade de Programação]
// Professor : cláudio fico
// Descrição : vamos adivinha a idade
// Autor(a) : cristovao das virgens soares
// Data atual : 24/05/2019
Var
// Seção de Declarações das variáveis
anocorrente, jafezaniversario, dif250, resultado :inteiro
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
escreval (" **Esta e uma brincadeira de adivinhaçao,")
escreval(" e só funciona para quem tem até 99 anos**")
escreval("")
escreva ("Estamos em qual ano corrente (2018, 2019, ..., aaaa)?: ")
leia (anocorrente)
escreva ("Se voce ja fez aniversario este ano, digite 1; senão, digite 2: ")
leia (jafezaniversario)
se jafezaniversario = 1 entao
dif250 <- anocorrente - 250
senao
dif250 <- anocorrente - 251
fimse
escreval
escreval ( "==> Voce tem que responder 1 ou 2. <==")
escreval
enquanto (jafezaniversario <> 1) e (jafezaniversario <> 2) faca
escreva ("Se voce ja fez aniversario este ano, digite 1; senao, digite 2: ")
leia (jafezaniversario)
fimenquanto
escreval("Chegou a hora de fazer umas continhas")
escreval ("Pense em um numero inteiro entre 1 e 9 e anote-o para nao esquecer")
escreval ("Multiplique por 2 o numero que foi pensado")
escreval ("Some 5 ao resultado encontrado")
escreval ("Multiplique por 50 esse novo resultado")
escreval ("somar", dif250, " a esse total encontrado")
escreval ("Subtrair o ano de seu nascimento desse novo resultado encontrado")
escreval("")
escreval("")
escreval ("Agora informe o resultado que voce encontrou")
leia (resultado)
escreval
escreval ("* Vamos analisar o numero", resultado, " que voce encontrou *")
escreval ("")
escreval ("=> Muito provavelmente ele contem tres algarismos")
escreval ("=> O algarismo da esquerda e o numero que voce pensou")
escreval ("=> Os dois outros informam sua idade")
escreval
escreval ("")
escreval ("=> Acertei?")
escreval ("")
escreval
escreval ("* Fim da brincadeira *")
fimalgoritmo