Ir ao conteúdo
  • Cadastre-se

VisualG Erro de sintaxe no Visualg


Posts recomendados

Estou com dificuldade neste algoritmo de Harry Farrer. Toda vez em que clico para rodar ele, aparece uma mensagem e diz "erro de sintaxe na linha 10 (declare HOMENS : inteiro;             //número de homens entrevistados"), já quebrei a cabeça e não consegui resolver.

segue o algoritmo

Var
Inicio
//Declarações das variáveis
declare HOMENS : inteiro;             //número de homens entrevistados
declare MULHERES : inteiro;           //número de mulheres entrevistadas
declare R_SIM : inteiro;              //número de pessoas que responderam sim
declare R_NÃO : inteiro;              //número de pessoas que responderam não
declare RESP : caracter;              //resposta sim ou não (S ou N, s ou n)
declare SEXO : caracter;              //sexo do entrevistado (M ou F, m ou f)
declare R_SIM_M : inteiro;            //contador de respostas sim de mulher
declare R_NAO_H : inteiro;            //contador de resposta não de homem
declare N : inteiro;                  //contador para o número de pessoas
declare P_SIM_M : real;               //porcentagem de respostas sim de mulher
declare P_NÃO_H : real;               //porcentagem de respostas não de homem
declare ENTREVISTADO : inteiro;

Inicio
//Inicialização dos acumuladores gerais

N:=0/*contador até 150 pessoas*/
HOMENS:=0;
MULHERES:=0;
R_SIM:=0;
R_NÃO:=0;
R_SIM_M:=0;
R_NÃO_H:=0;
ENTREVISTADOS:=4;

repita ataque (N==ENTREVISTADOS)

leia("Informe o Sexo", SEXO;
leia("Gostou do produto (S/N):", RESP);

//verificar se a pessoa é homem ou mulher
se (SEXO=='M'|SEXO=='N')
{
HOMENS:=HOMENS+1;
se (RESP=='N'|RESP=='n')
{
R_NÃO_H:=R_NÃO_H+1;
}
{
senão
}
se (SEXO=='F'|SEXO=='f')
{
MULHERES:=MULHERES+1;
se (RESP=='S'|RESP=='s')
{
R_SIM_M:=R_SIM_M+1;
}
//verificar se a resposta da pessoa é sim ou não
se (RESP=='s'|RESP=='s')
{
R_SIM:=R_SIM+1;
}
senão
{
se (RESP=='N'|RESP=='n')
{
R_NÃO:=R_NÃO+'
}
N:=N+1
{
//cálculo dos porcentuais
P_SIM_M:=100*(R_SIM_M/ENTREVISTADOS);
P_NÃO_H:=100*(R_NÃO_H/ENTREVISTADOS);

//resultados
escreva ("Quantidade de pessoas que responderam sim:",R_SIM);
escreva ("Quantidade de pessoas que responderam não:",R_NÃO);
escreva ("% de mulheres que responderam sim:" P_SIM_M);
escreva ("% de homens que responderam não:", P_NÃO_H);
}
Fimalgoritmo

 

Alguém poderia me ajudar?

Link para o comentário
Compartilhar em outros sites

  • Membro VIP

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

 

Sobre:

Em 27/06/2019 às 02:42, carolbruna disse:

Estou com dificuldade neste algoritmo de Harry Farrer. Toda vez em que clico para rodar ele, aparece uma mensagem e diz "erro de sintaxe na linha 10 (declare HOMENS : inteiro;             //número de homens entrevistados"), já quebrei a cabeça e não consegui resolver.

 

Basicamente está utilizando uma sintaxe que não é do Visualg, ou seja: essa "linguagem de programação" do código que você postou é para OUTRO PROGRAMA (ou sequer é uma "sintaxe para um programa". Algo como sendo utilizado apenas no "papel" mesmo).

 

Então, "Portugol" é apenas "um termo" que se referencia a uma, das diversas, "pseudolinguagem que permite ao leitor desenvolver algoritmos estruturados em português de forma simples e intuitiva" (Wikipedia). O Portugol do Visualg é um; já o Portugol do Portugol Studio é outro; já o Portugol do PortugolIDE é outro também... aí tem que ver para qual é o que você postou. (eu não consegui descobrir)

 

 

Aqui no Fórum geralmente utilizamos o Visualg.

 

Caso queira responder o enunciado do exercício na sintaxe do Visualg, segue um esboço:

algoritmo "FCdH"
const
   //MAX_ENTREVISTADOS = 5
   MAX_ENTREVISTADOS = 2 //valor menor para facilitar os testes
var
   qtdHomens      :inteiro
   qtdMulheres    :inteiro
   qtdSim         :inteiro
   qtdNao         :inteiro
   qtdSimMulheres :inteiro
   qtdNaoHomens   :inteiro
   porcSimMulheres:inteiro
   porcNaoHomens  :inteiro
   resposta       :caracter //resposta sim ou não (S ou N)
   sexo           :caracter
   contPessoas    :inteiro
inicio
repita
   contPessoas <- contPessoas + 1
   limpaTela()
   escreval("")
   escreval(" ENTREVISTADO ", contPessoas)
   escreval("")
   escreva ("SEXO (M/F): ")
   leia(sexo)
   escreva ("Gostou do produto (S/N):")
   leia(resposta)

   se (sexo = "M") entao //o Visualg não NÃO é Case-sensitive
      qtdHomens <- qtdHomens + 1
   fimSe


   se (resposta = "S") entao
      qtdSim <- qtdSim + 1
   fimSe


ate (contPessoas >= MAX_ENTREVISTADOS)

limpaTela
escreval("")
escreval("Quantidade de pessoas que responderam sim:", qtdSim)





fimAlgoritmo

 

Aí seria só dar continuidade.

 

Qualquer dúvida é só postar.

 

No aguardo.

Link para o comentário
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisa ser um usuário para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora

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...