VisualG Visual G com vetores

[saysasilva]

Fazer o programa com o PARA-FIMPARA e também com vetores:

 

Alguém pode me ajudar??

 

1. Faça um programa para gerar dados dos 230 registros contendo: 

   A inscrição sendo de um sequencial a partir de 500.

   Origem escolar (1- publica ou 2- particular)

   Local (1- Macaé ou 2- Região)

   pontuação de (1-100)

   nível de informática (40 ate 60 pontos-  básico; 51 a 80- intermediário ; 81 a 100- avançado)

OBS: nível abaixo de 40 não classificado.

 

calcular:

2- media da pontuação obtida de todos os candidatos;

3- o percentual de jovens de macae e regiao;

4- percentual de jovens por nível de informática;

5- percentual de jovens de escola publica com o nível de informática avançado;

5- maior pontuação obtida com o respectivo numero de inscrição.

 

 

Eu fiz assim:

Var
   // Seção de Declarações das variáveis
   cont, org, local, pont, tbas, tint, tavan, mac, reg, part, pub, pubAv, mpont, mcont: inteiro
   mediapont, totpont, percmac, percreg, percbas, percint, percavan, percPubAv:real

Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   cont<-0
   escreval( "  N° Origem Escolar  -   Localidade  - Ponto -  Nivel C.I  ")
   para cont de 500 ate 729 faca
      org<-randi(2)+1
      local<-randi(2)+1
      pont<-randi(101)
      escreva(cont, "- ")

      //Origem Escolar
      se org=1 então
         escreva("  Pública      -")
         pub<-pub+1
         se pont>80 então
            pubAv<-pubAv+1
         fimse
      fimse
      se org=2 então
         escreva("  Particular   -")
         part<-part+1
      fimse

      //Localidade
      se local=1 então
         escreva("     Macaé     -")
         mac<-mac+1
      fimse
      se local=2 então
         escreva("    Região     -")
         reg<-reg+1
      fimse

      //Nivel de conhecimento em Informática
      se (pont<40) então
         escreva(" ", pont:4, "  -  Não Classificado")
      fimse
      se (pont>=40) e (pont<=60) então
         escreva (" ", pont:4, "  -  Básico          ")
         tbas<-tbas+1
      fimse
      se (pont>60) e (pont<=80) então
         escreva (" ", pont:4, "  -  Intermediario   ")
         tint<-tint+1
      fimse
      se (pont>80) então
         escreva (" ", pont:4, "  -  Avançado        ")
         tavan<-tavan+1
      fimse

      se pont>mpont então
         mpont<-pont
         mcont<-cont
      fimse

      //total dos pontos
      totpont<-totpont+pont

   fimpara

   escreval(" ")
   escreval("=====================================================")
   //2-calcule a media de todos os candidatos
   mediapont<-(totpont/cont)
   escreval(" Média de todos os candidatos: ", mediapont:3:2)

   //3-Percentual de jovens oriundo em macaé e região
   escreval(" ")
   escreval(" =====================================================")
   percmac<-(mac/cont)/100
   escreval(" Percentual de jovens em Macaé : ", percmac:3:4)

   percreg<-(reg/cont)/100
   escreval(" Percentual de jovens em Região: ", percreg:3:4)

   //4-Percentual de jovens por nivel
   escreval(" ")
   escreval(" =====================================================")
   percbas<-(tbas/cont)/100
   escreval(" Percentual de jovens em basquete : ", percbas:3:4)

   percint<-(tint/cont)/100
   escreval(" Percentual de jovens em Intermediário : ", percint:3:4)

   percavan<-(tavan/cont)/100
   escreval(" Percentual de jovens em Avançado : ", percavan:3:4)

   //5-Percentual de jovens na escola publica no nivel avançado
   escreval(" ")
   escreval(" =====================================================")
   percPubAv<- (pubAv/pub)*100
   escreval(" Percentual de jovens de Esc. Pub. no Nivel Avançado : ", percPubAv:3:2)

   //6-A maior pontuação obtida + o n° de inscrição
   escreval(" ")
   escreval(" =====================================================")
   escreval(" A maior pontuação obtida e o respectivo n° de inscrição :")
   escreval(" -------->  Ponto: ", mpont, "  ---  N° ", mcont, " <--------")

   escreval(" ")
   escreval(" ========================FIM==========================")

Fimalgoritmo

 

[Simon Viegas]

22 horas atrás, saysasilva disse:

Alguém pode me ajudar??

 

Opa! Sim podemos... é para isso que serve os fóruns...

 

 

Sobre:

22 horas atrás, saysasilva disse:

Eu fiz assim:

 

Certo. Qual a sua dúvida agora? É uma pergunta retórica... mas a ideia é que você precisa primeiro identificar qual é o problema, para assim tentar solucioná-lo... Especifique algo... Ex.: "o cálculo da porcentagem não está batendo". Daí, você vai lá e foca nisso...

 

Te adianto duas dicas:

1. Faça testes com uma faixa menor, por exemplo, com 10 itens (de 500 a 509);

2. O total de itens NÃO está em cont... você poderia usar o delta da faixa, mais 1... (500-509), ou seja, o total seria 10, e não 509.

 

Tem diversos outros probleminhas... vá aí fazendo testes... vendo qual resultado está dando e aí vai ajustando...

 

Tá! vai mais uma dica: para calcular a porcentagem, precisa multiplica por 100, e não dividir. Ex.:

 

Total: 5

Ocorrências: 3

Logo: 3/5*100 = 60, ou seja: 60%

Adendo: a porcentagem em si seria 3/5, mas como vai exibir em %, aí multiplica por 100 (pois "por cento" se traduz em "dividido por 100", por isso se multiplica por 100 para compensar, ou seja, ou usa 0,6 ou usa 60%... é a mesma coisa)

 

Por aí vai...

Adendo: sobre os vetores... não se preocupe. Primeiro arrume o código para rodar lisinho do jeito que está, depois para para alterar para vetores.