VisualG erro de sintaxe no visualg

[Stele]

 

<>

A primeira coisa que o programa tem de fazer é informar ao participante que a brincadeira de adivinhação só funciona para quem tem até 99 anos. Utilize a mensagem: “Esta é uma brincadeira de adivinhação e só funciona para quem tem até 99 anos.”.
Em seguida, o programa deve pedir para o participante informar o ano corrente (2018, 2019, ..., aaaa). Utilize a mensagem: “Estamos em qual ano corrente (2018, 2019, ..., aaaa)?”. Essa informação deverá ser lida e guardada na variável anocorrente.
6.1 O ano corrente não é criticado, e, por isso, o participante deve ter atenção ao preenchê-lo.

Agora, o programa deve perguntar se o participante já fez aniversário no ano corrente ou se ainda irá fazer. Utilize a mensagem: “Se você já fez aniversário este ano, digite 1; senão, digite 2: ”. Essa informação deverá ser lida e guardada na variável jafezaniversario.
Se a variável jafezaniversario for igual a 1, então a variável dif250 será igual ao anocorrente menos 250.
Se a variável jafezaniversario for igual a 2, então a variável dif250 será igual ao anocorrente menos 251.
Se a variável jafezaniversario for diferente de 1 e de 2, então deve ser informada a mensagem “==> Você tem que responder 1 ou 2. <==”. Em seguida, deve ser feita a pergunta do item 7 mais uma vez. “Se você já fez aniversário este ano, digite 1; senão, digite 2:”.
Crie um laço (loop) para criticar a informação do participante de tal forma que só saia desse laço (loop) após ele ter respondido 1 ou 2. Como opção, o programador pode criar a variável controle para controlar esse laço (loop).
Dando prosseguimento, o programa deverá informar ao participante a seguinte mensagem: “Chegou a hora de fazer umas continhas:”.
Em seguida, o programa deverá pedir ao participante para:
Pensar um número inteiro entre 1 e 9 e anotá-lo para não esquecer.
Multiplicar por 2 o número que foi pensado.
Somar 5 ao resultado encontrado.
Multiplicar por 50 esse novo resultado.
Somar dif250 a esse novo total encontrado.
O conteúdo da variável dif250 deverá aparecer concatenado com a mensagem do item 9.5. Exemplo: Somar 1768 a esse novo total encontrado.
Subtrair o ano de seu nascimento desse novo resultado encontrado.
O programa deverá pular uma linha.
Informar o resultado que foi encontrado. Utilizar a mensagem: “Agora, informe o resultado que você encontrou: ”. Essa informação deverá ser lida e guardada na variável resultado.
O programa deverá pular uma linha.
Agora, o programa deverá informar ao participante a seguinte mensagem: “* Vamos analisar o número ”, resultado, “ que você encontrou *”.
O conteúdo da variável resultado deverá aparecer concatenado com a mensagem do item 10. Exemplo: “* Vamos analisar o número 261 que você encontrou *”.
O programa deverá pular uma linha.
O programa deverá informar ao participante a seguinte mensagem:
     “=> Muito provavelmente ele contém três algarismos”

     “=> O algarismo da esquerda é o número que você pensou”

     “=> Os dois outros informam sua idade”

O programa deverá pular uma linha.
Informar ao participante a seguinte mensagem:
     “=> Acertei?”

O programa deverá pular uma linha.
O programa deverá informar ao participante a seguinte mensagem:
   “"* Fim da brincadeira *”

Terminar o programa.

 

 

Var
numero, num:inteiro
anocorrente, ac:inteiro
niv:inteiro
dif250:inteiro


Inicio
escreva("Está é uma brincadeira de adivinhação e só funciona para quem tem até 99 anos.")
escreval("")
num<-99
escreva("Estamos em qual ano corrente? (2013,2016...)")
leia(ac)
escreva("Se já fez aniversario este ano,digite 1;senão,digite 2:")
Leia(num)

A partir daqui começa o erro "esperava encontrar o Entao" ou "erro de sintaxe"

se(num=1) Então (dif=ac-200)
se(num=2)Então (dif=a-251)
se(num <>1,2)Então
fimse
escreva("Se já fez aniversario este ano,digite 1;senão,digite 2:")

Fimalgoritmo

Desde já agradeço pela ajuda!

[Simon Viegas]

Olá @Stele, seja bem vinda ao Fórum do Clube do Hardware.

 

@Stele, teu programa tem diversos pequenos erros... sugiro refazer o código e ir implementando aos poucos.

 

O enunciado está especificando bem como o código de ser feito... basta ir identificando os passos e implementando.

 

No enunciado tem:

3 horas atrás, Stele disse:

A primeira coisa que o programa tem de fazer é informar ao participante que a brincadeira de adivinhação só funciona para quem tem até 99 anos. Utilize a mensagem: “Esta é uma brincadeira de adivinhação e só funciona para quem tem até 99 anos.”.
Em seguida, o programa deve pedir para o participante informar o ano corrente (2018, 2019, ..., aaaa). Utilize a mensagem: “Estamos em qual ano corrente (2018, 2019, ..., aaaa)?”. Essa informação deverá ser lida e guardada na variável anocorrente.
6.1 O ano corrente não é criticado, e, por isso, o participante deve ter atenção ao preenchê-lo.

Agora, o programa deve perguntar se o participante já fez aniversário no ano corrente ou se ainda irá fazer. Utilize a mensagem: “Se você já fez aniversário este ano, digite 1; senão, digite 2: ”. Essa informação deverá ser lida e guardada na variável jafezaniversario...

 

Segue um exemplo de esboço inicial:

algoritmo "FCdH"
var
  anoCorrente :inteiro
  jaFezAniversario :inteiro

inicio
   escreval("Esta é uma brincadeira de adivinhação e só funciona para")
   escreval("quem tem até 99 anos.")
   escreval("")
   escreva("Estamos em qual ano corrente (2018, 2019, ..., aaaa)?)")
   leia(anoCorrente)
   escreval"Se você já fez aniversário este ano, digite 1; senão, digite 2: ")
   leia(jaFezAniversario)
fimAlgoritmo

Perceba que é simplesmente seguir o que está sendo pedido...

 

Uma próxima parte:
 

3 horas atrás, Stele disse:

Se a variável jafezaniversario for igual a 1, então a variável dif250 será igual ao anocorrente menos 250.

 

algoritmo "FCdH"
var
  anoCorrente :inteiro
  jaFezAniversario :inteiro
  dif250 :inteiro

inicio
   escreval("Está é uma brincadeira de adivinhação e só funciona para")
   escreval("quem tem escreval até 99 anos.")
   escreval("")
   escreva("Estamos em qual ano corrente (2018, 2019, ..., aaaa)?)")
   leia(anoCorrente)
   escreval("Se você já fez aniversário este ano, digite 1; senão, digite 2: ")
   leia(jaFezAniversario)
   se (jaFezAniversario = 1) entao
     dif250 <- anoCorrente - 250
   fimSe
   
   
   
fimAlgoritmo

 

Como sugestão, dê continuidade ao código acima. Crie os próximos 2 se (um embaixo do outro). Vá seguindo o mesmo padrão.

 

Se tiver tudo certinho, vá para o próximo passo, que é criar um laço de repetição assim como está sendo solicitado..

 

 

Caso não tiver problemas, vá implementando uma próximo etapa e testando..

 

Qualquer dúvida é só postar o código completo atual e onde está com dúvidas.

 

No aguardo.