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?