CriadorDeTravaZap

Eu estou estudando algoritmo e estou tendo problema com o Visualg, ele buga, mesmo sendo uma versão mais atualizada, ele da esse erro, eu já terminei, ele esta assim: algoritmo "Seletor de Pessoas" var Sex, Resp: Caractere Old, Hair: Inteiro Cont1, Cont2: Inteiro inicio Repita EscrevaL("======================") Escreval("| SELETOR DE PESSOAS |") EscrevaL("======================") EscrevaL("Qual o sexo? [M/F]") Leia(Sex) EscrevaL("Qual idade? ") Leia(Old) EscrevaL("Qual a cor do cabelo?") EscrevaL("----------------------") EscrevaL("[1] Preto") EscrevaL("[2] Castanho") EscrevaL("[3] Loiro") EscrevaL("[4] Ruivo") Leia(Hair) Escolha Hair Caso 1 Hair <- 1 Caso 2 Hair <- 2 Caso 3 Hair <- 3 Caso 4 Hair <- 4 FimEscolha Se(Sex = "F")e(Old => 25)e(Old <= 30)e(Hair = 3)entao Cont2 <- Cont2 + 1 SeNao Se(Sex = "M")e(Old => 18)e(Hair =2)entao Cont1 <- Cont1 + 1 FimSe FimSe EscrevaL("Você deseja continuar? [S/N]") Leia(Resp) Ate(Resp = "N") EscrevaL("Total de Homemns com mais de 18 e cabelos castanhos", Cont1) Escreva("Total de Mulheres entre 25 e 30 com cabelos loiros", Cont2) fimalgoritmo

Eu estou tendo um problema em não conseguir executar meu arquivo .alg, ele fala que o faça esta faltando em meu algoritmo, mas ele simplesmente está no algoritmo. E mesmo eu reiniciando meu programa, ele continua dando erro, e eu não acho esse tal erro, já tentei mudar tipo de var, mas nada muda. No momento ele está assim: algoritmo "semnome" var R, D, Con, S: REAL inicio D <- 1 S <- 0 Enquanto(D <= 5) faca Escreva("Qual o valor em R$? ") Leia(R) D <- R/5,62 EscrevaL("O Valor convertido e US$", D:5:2) Con <- Con + 1 S <- S + D FimEnquanto fimalgoritmo Lembrando que o algoritmo não está de fato pronto, so executei o para saber se o valor estava sendo colocado na variável certa.