VisualG Erro de sintaxe no Visualg

[carolbruna]

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?

[Nylan]

Cadê as Variáveis no seu código?

1 hora atrás, carolbruna disse:

Var

 

[Horse With No Name]

Vou seguir este tópico. Assim que eu chegar na minha casa. tento executar e debuggar o Código com cuidado.

 

Se tiver paciência de esperar.  te ajudo minha amiga

 

IIIIIIINN RURRRR - finja que isso foi um cavalo

[Simon Viegas]

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.