Ir ao conteúdo
Regras do Clube do Hardware

Criar um algoritmo para Vestibulinho Alcídio.

Joao emilioborges
 Compartilhar

Posts recomendados

Joao emilioborges
 

Joao emilioborges

Postado
Postado

ALguém Please "
Não Imagino porque esse código está dando errado ,já que eu fiz tudo direitinho


Algoritmo “Algo40_Vestibulinho Alcídio”

Criar um algoritmo para Vestibulinho Alcídio.
Receber na tela:
    Nome do candidato;
    Cidade de origem;
    Idade;
    Curso desejado;
    Período do curso;
    Preço do Manual;
    Preço inscrição.

Mostrar a mensagem “Curso não cadastrado” quando diferente de Informática, Administração, Contabilidade, Enfermagem, Marketing, Farmácia, Ensino Médio, Jurídico, Informática para internet;

Calcular o Valor total (PM+PI).

Calcular um desconto sobre o VT de:
1% para alunos da cidade de Orlândia com idade até 20 anos;
2% para alunos da cidade de Orlândia com idade com mais de 20 anos;
3% para alunos de outras cidades inscritos para “Informática”;
4% para alunos de outras cidades inscritos para “Enfermagem”;
5% para alunos de outras cidades inscritos para “Informática” e com idade igual a16 anos;
6% para alunos da cidade de Orlândia, inscritos para “Informática”, período da tarde com até 16 anos;
10% para alunos da cidade de Orlândia inscritos para “Informática”.
    Mostrar o valor total;
    Mostrar o valor do desconto;
    Mostrar o valor a pagar.
Mostrar a mensagem de desconto e o motivo deste desconto.

Mostrar no final:
    Total de alunos inscritos para os cursos: Informática, Administração, Contabilidade, Enfermagem, Marketing, Farmácia, Ensino Médio, Jurídico, Informática para internet;
    Valor total concedido em desconto;
    Valor total arrecadado (com desconto).

 

 

adicionado 1 minuto depois 
Algoritmo "Alcídio"
// Função : Criar Algoritmo para Vestibulinho Alcídio
// Autor : João Emilio
// Data : 01/05/2017
// Seção de Declarações
Var
   // Seção de Declarações das variáveis
   TOTALinformatica,TOTALadm,TOTALcontabilidade,TOTALenfermagem :inteiro
   TOTALmarketing,TOTALfarmacia, TOTALensinomedio,TOTALjuridico,TOTALinfinternet :inteiro
   Candidatos    :vetor[1..20,1..8] de caractere
   continuar     :caractere //flag para verificar se deseja continuar cadastrando
   MAXIMO,i      :inteiro  //maximo de Alunos possíveis
   quant         :inteiro  //quantidade de Alunos
   cont          :inteiro  //quantidade de impressões na tela (não imprimir tudo de vez)
   VALORtotal    :real
   TAXAdesconto  :real
   VALORpagar    :real
   TOTALdesconto :real
   TOTALarrecadado :real

Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   MAXIMO<- 2
   //CADASTRO DE Alunos
   continuar:="s"
   enquanto continuar <> "N" faca
      //APRESENTAÇÃO DO PROGRAMA
      escreval()
      escreval("================================")
      escreval("ETEC Prof.Alcídio de Souza Prado")
      escreval("     Vestibulinho Alcídio       ")
      escreval("================================")
      escreval()
      quant:=quant+1
      escreva("Nome do Candidato....: ")
      leia(Candidatos[quant,1])
      escreva("Cidade de Origem.....: ")
      leia(Candidatos[quant,2])
      escreva("Idade................: ")
      leia(Candidatos[quant,3])
      escreva("Curso Desejado.......: ")
      leia(Candidatos[quant,4])
      escreva("Período do Curso.....: ")
      leia(Candidatos[quant,5])
      escreva("Preço do Manual......: R$ ")
      leia(Candidatos[quant,6])
      escreva("Preço da Inscrição...: R$ ")
      leia(Candidatos[quant,7])
      escreval()
      escreval()
      escreva("Quer Cadastrar Mais Um Candidato?  <  S/N   >  ")
      leia(continuar)
      se quant+1 > maximo então
         escreva("Só Pode Cadastrar Até",MAXIMO," Candidato...  Tecle Enter")
         leia(continuar)
         continuar:="n"
      fimse
      limpatela
   fimenquanto

   //Variáveis Zeradas
   limpatela
   cont<- 0
   para i de 1 ate quant faca
      //Exibição dos resultados
      escreval()
      cont:=cont+1
      escreval("Nome do Candidato ----> ",Candidatos[i,1])
      escreval("Cidade de Origem -----> ",Candidatos[i,2])
      escreval("Idade ----------------> ",Candidatos[i,3])
      escreval("Curso Desejado -------> ",Candidatos[i,4])
      escreval("Período do Curso -----> ",Candidatos[i,5])
      escreval("Preço do Manual ------> R$ ",Candidatos[i,6])
      escreval("Preço da Inscrição ---> R$ ",Candidatos[i,7])

      //Cálculo Do Valor Total
      VALORtotal<-(caracpnum(Candidatos[i,6])+caracpnum(Candidatos[i,7]))
      Escreval("Valor Total de -------> R$ ",VALORtotal:3:2)


      //Cálculo do DEsconto
      se ((Candidatos[i,2]) = "orlandia") e ((Candidatos[i,3]) <= 20 ) então
         TAXAdesconto<-(VALORtotal*0.01)
         Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
      senao
         se ((Candidatos[i,2]) = "orlandia") e ((Candidatos[i,3]) > 20 ) então
            TAXAdesconto<-(VALORtotal*0.02)
            Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
         senao
            se ((Candidatos[i,2]) <> "orlandia") e ((Candidatos[i,4]) = "informatica") então
               TAXAdesconto<-(VALORtotal*0.03)
               Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
            senao
               se ((Candidatos[i,2]) <> "orlandia") e ((Candidatos[i,4]) = "enfermagem") então
                  TAXAdesconto<-(VALORtotal*0.04)
                  Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
               senao
                  se ((Candidatos[i,2]) <> "orlandia") e ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,3]) = 16 ) então
                     TAXAdesconto<-(VALORtotal*0.05)
                     Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
                  senao
                     se ((Candidatos[i,2]) = "orlandia") e ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,5]) = "tarde") e  ((Candidatos[i,3]) <= 16 ) então
                        TAXAdesconto<-(VALORtotal*0.06)
                        Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
                     senao
                        se ((Candidatos[i,2]) = "orlandia") e ((Candidatos[i,4]) = "informatica") então
                           TAXAdesconto<-(VALORtotal*0.1)
                           Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
                        senao
                           se ((Candidatos[i,4]) <> "informatica") ou ((Candidatos[i,4]) <> "administracao")  ou ((Candidatos[i,4]) <> "contabilidade") ou ((Candidatos[i,4]) <> "enfermagem") ou ((Candidatos[i,4]) <> "marketing") ou ((Candidatos[i,4]) <> "farmacia") ou ((Candidatos[i,4]) <> "ensino medio") ou ((Candidatos[i,4]) <> "juridico") ou ((Candidatos[i,4]) <> "informatica para internet") então
                              TAXAdesconto<-0
                              escreval("Curso não Cadastrado")
                              leia(continuar)
                           fimse
                        fimse
                     fimse
                  fimse
               fimse
            fimse
         fimse
      fimse


      VALORpagar<-(VALORtotal-TAXAdesconto) //Cálculo do VALOR a PAgar
      TOTALdesconto:=(TOTALdesconto+TAXADESCONTO) //Acumula o DEScnto a dar pela Escola
      TOTALarrecadado:=(TOTALarrecadado+VALORpagar) //Acumula o Total que a EScola vai arrecadar

      //Mostra os Valores Total/DEsconto/A Pagar
      se TAXAdesconto <> 0 então
         Escreval("Valor do Desconto ----> R$ ",TAXAdesconto:3:2)
         Escreval("Valor a Pagar --------> R$ ",VALORpagar:3:2)
      fimse

      //Acumulador de ALunos Por curso
      se (Candidatos[i,4]="informatica") então
         TOTALinformatica:= TOTALinformatica+1
      senao
         se (Candidatos[i,4]="administracao") então
            TOTALadm:= TOTALadm+1
         senao
            se (Candidatos[i,4]="contabilidade") então
               TOTALcontabilidade:= TOTALcontabilidade+1
            senao
               se (Candidatos[i,4]="enfermagem") então
                  TOTALenfermagem:= TOTALenfermagem+1
               senao
                  se (Candidatos[i,4]="marketing") então
                     TOTALmarketing:= TOTALmarketing+1
                  senao
                     se (Candidatos[i,4]="farmacia") então
                        TOTALfarmacia:= TOTALfarmacia+1
                     senao
                        se(Candidatos[i,4]="ensino medio")então
                           TOTALensinomedio:= TOTALensinomedio+1
                        senao
                           se (Candidatos[i,4]="juridico")então
                              TOTALjuridico:= TOTALjuridico+1
                           senao
                              se (Candidatos[i,4]="informatica para internet") então
                                 TOTALinfinternet:= TOTALinfinternet+1
                              fimse
                           fimse
                        fimse
                     fimse
                  fimse
               fimse
            fimse
         fimse
      fimse
   fimpara


   se cont=2 então  //Contador de Pessoas Impressas na TEla
      cont:=0
      escreval()
      escreval("Tecle Enter Para Continuar")
      leia(continuar)
   fimse



   //TOTAL
   escreval()
   escreval("===============================================================")
   escreval()
   escreval("Total de ALunos Inscritos Curso de Informática -----> ",TOTALinformatica)
   escreval("Total de ALunos Inscritos Curso de Administração ---> ",TOTALadm)
   escreval("Total de ALunos Inscritos Curso de Contabilidade ---> ",TOTALcontabilidade)
   escreval("Total de ALunos Inscritos Curso de Enfermagem ------> ",TOTALenfermagem)
   escreval("Total de ALunos Inscritos Curso de Marketing -------> ",TOTALmarketing)
   escreval("Total de ALunos Inscritos Curso de Farmácia --------> ",TOTALfarmacia)
   escreval("Total de ALunos Inscritos Curso de Ensino Médio ----> ",TOTALensinomedio)
   escreval("Total de ALunos Inscritos Curso de Jurídico --------> ",TOTALjuridico)
   escreval("Total de ALunos Inscritos Curso de Informática Pra Internet --> ",TOTALinfinternet)
   escreval()
   escreval("Valor Total Concedido em Descontos Pela ETEC -> ",TOTALdesconto:3:2)
   escreval("Valor Total Arrecadado pela ETEC ALcídio -----> ",TOTALarrecadado:3:2)
   escreval("===============================================================")
fimalgoritmo

 

  • Curtir 1
  • Membro VIP
Simon Viegas
 

Simon Viegas

Postado
  • Membro VIP
Postado

Olá @Joao emilioborges.

 

Tente ser mais específico..  Onde o código está dando errado? tente entender o problema, para assim tentar achar uma solução.

 

 

 

 

 

 

 

obs.: cuidado com os critérios do enunciado:
 

12 horas atrás, Joao emilioborges disse:

Calcular um desconto sobre o VT de:
1% para alunos da cidade de Orlândia com idade até 20 anos;
2% para alunos da cidade de Orlândia com idade com mais de 20 anos;
3% para alunos de outras cidades inscritos para “Informática”;
4% para alunos de outras cidades inscritos para “Enfermagem”;
5% para alunos de outras cidades inscritos para “Informática” e com idade igual a16 anos;
6% para alunos da cidade de Orlândia, inscritos para “Informática”, período da tarde com até 16 anos;
10% para alunos da cidade de Orlândia inscritos para “Informática”.

 

Pois no seu código você está usando "se..senao" para verificar essa condições, mas nem todas são "mutuamente exclusivas", ou seja, tem condições ai que podem ocorrer, mesmo que uma outra já tenha ocorrido!!!! Ex.: 3% com 5%; 1% com 6% e 10%; O 10% por si só já é conflitante!!!! (se eu sou de Orlândia, e tenho 16 anos, eu ia exigir 10%)

 

Resumindo: terá que reformular essas condições, por exemplo começando pela cidade, e após verificar as outras coisas (um se dentro do se). Ou, inicialmente, REMOVER os senão e após, com mais calma, reanalisá-las. (obs.: mesmo sem os senao, poderá ter problemas)

 

No aguardo.

  • Curtir 2
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado
35 minutos atrás, Simon Viegas disse:

Olá @Joao emilioborges.

 

Tente ser mais específico..  Onde o código está dando errado? tente entender o problema, para assim tentar achar uma solução.

 

 

 

 

 

 

 

obs.: cuidado com os critérios do enunciado:
 

 

Pois no seu código você está usando "se..senao" para verificar essa condições, mas nem todas são "mutuamente exclusivas", ou seja, tem condições ai que podem ocorrer, mesmo que uma outra já tenha ocorrido!!!! Ex.: 3% com 5%; 1% com 6% e 10%; O 10% por si só já é conflitante!!!! (se eu sou de Orlândia, e tenho 16 anos, eu ia exigir 10%)

 

Resumindo: terá que reformular essas condições, por exemplo começando pela cidade, e após verificar as outras coisas (um se dentro do se). Ou, inicialmente, REMOVER os senão e após, com mais calma, reanalisá-las. (obs.: mesmo sem os senao, poderá ter problemas)

 

No aguardo.

Sim ..então posso tentar o escolha caso !

  • Curtir 1
  • Membro VIP
Simon Viegas
 

Simon Viegas

Postado
  • Membro VIP
Postado

Não... "escolha..caso" é análogo a "se..senao", só que escrito de forma diferente...  pense assim: "caso seja a primeira opção, senão, caso seja a segunda, senão, caso seja a terceira...", entende?   O escolha..caso pode ser considerado um se..senao mais sofisticado, só que mais limitado.

 

 

 

 

 

Assim como um para é uma forma diferente de escrever um enquanto utilizando um contador. Seria tb uma forma mais sofisticada, só que mais limitada.  Algo como: 

para i de 1 ate 10 faca

fimPara

e análogo a: 

i<-1
enquanto (i<=10) faca


  i<-i+1  
fimEnquanto

Ou seja, assim como o para "facilita/organiza" em alguns contextos em vez do enquanto, o escolha..caso, "facilita/organiza" em alguns contextos para o "se..senao".

 

 

Mas resumindo:
Ignore essa questão por enquanto! Deixe com os senão mesmo... se atente para os outros pontos do problema. Depois verifique isso, ou seja, essa condições é UM dos problemas que precisão ser verificados.

 

Fora essa questão, qual parte "está dando errado" ?

  • Curtir 2
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado
1 hora atrás, Simon Viegas disse:

Não... "escolha..caso" é análogo a "se..senao", só que escrito de forma diferente...  pense assim: "caso seja a primeira opção, senão, caso seja a segunda, senão, caso seja a terceira...", entende?   O escolha..caso pode ser considerado um se..senao mais sofisticado, só que mais limitado.

 

 

 

 

 

Assim como um para é uma forma diferente de escrever um enquanto utilizando um contador. Seria tb uma forma mais sofisticada, só que mais limitada.  Algo como: 


para i de 1 ate 10 faca

fimPara

e análogo a: 


i<-1
enquanto (i<=10) faca


  i<-i+1  
fimEnquanto

Ou seja, assim como o para "facilita/organiza" em alguns contextos em vez do enquanto, o escolha..caso, "facilita/organiza" em alguns contextos para o "se..senao".

 

 

Mas resumindo:
Ignore essa questão por enquanto! Deixe com os senão mesmo... se atente para os outros pontos do problema. Depois verifique isso, ou seja, essa condições é UM dos problemas que precisão ser verificados.

 

Fora essa questão, qual parte "está dando errado" ?

So isso mesmo !eu entendi o que você quis dizer ..vou trabalha aqui e se conseguir posto aqui novamente!

  • Curtir 1
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado 
      //Condição ALunos de orlandia
      se ((Candidatos[i,2]) = "orlandia") então
         se  ((Candidatos[i,4]) = "informatica") então
            TAXAdesconto<-(VALORtotal*0.1)
            Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
         senao
            se   ((Candidatos[i,5]) = "tarde") e  ((Candidatos[i,3]) < 17 ) então
               TAXAdesconto<-(VALORtotal*0.06)
               Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
            senao
               se ((Candidatos[i,3]) < 21 ) então
                  TAXAdesconto<-(VALORtotal*0.01)
                  Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
               senao
                  se ((Candidatos[i,3]) > 21 )  então
                     TAXAdesconto<-(VALORtotal*0.02)
                     Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
                  fimse
               fimse
            fimse
         fimse

         //Condiçao Alunos Fora de Orlandia
      senao se ((Candidatos[i,2]) <> "orlandia") então
         se  ((Candidatos[i,4]) = "informatica") então
            TAXAdesconto<-(VALORtotal*0.03)
            Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
         senao
            se ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,3]) = 16 ) então
               TAXAdesconto<-(VALORtotal*0.05)
               Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
            fimse
         fimse
         se ((Candidatos[i,4]) = "enfermagem") então
            TAXAdesconto<-(VALORtotal*0.04)
            Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
         fimse
      fimse

Eu consegui chegar so ate aqui.

  • Curtir 2
  • Membro VIP
Simon Viegas
 

Simon Viegas

Postado
  • Membro VIP
Postado

Olá;

 

- Acho que seria melhor usar "<=16", em vez de "<17". Apesar de parecer ser a mesma coisa, tem uma certa diferença lógica. O mesmo vale para as outras idades... Onde tem "até" usam-se "<=" (ou ">="), já maior, usam-se apenas o ">" (sem o igual);

 

- No desconto de 2% você não está considerando o 21. (teria que ser ">20" ou, como sugiro, ">=21");

 

- O "senao se ((Candidatos[i,2]) <> "orlandia") então" faz-se desnecessário, pois necessariamente se não é de Orlandia (verificado acima), ele não será de Orlandia; (mas como é relativamente complexo, talvez seja interessante deixar, mas sabendo que é desnecessário no ponto de vista lógico. Você que sabe... tire dúvidas com seu professor/facilitador);

 

- A 5% nunca será executada, pois antes entraria no 3% (e o 5% tá no senão dele). Ai você poderia verificar se é "informática", e dentro colocar outro se verificando se é 5%, senão será 3% (seria como: "se não é de Orlancia, se é de informática, e se tem 16 anos"). E o 4% será o senão da "informatica". obs.: precisa do se, mesmo sendo a última verificação. (a depender do cadastro, poderá não ter desconto nenhum)

 

No aguardo.

  • Curtir 1
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado 
   //Condição ALunos de orlandia
      se ((Candidatos[i,2]) = "orlandia") então
         se  ((Candidatos[i,4]) = "informatica") então
            TAXAdesconto<-(VALORtotal*0.1)
            Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
         senao
            se   ((Candidatos[i,5]) = "tarde") e  ((Candidatos[i,3]) <= 16 ) então
               TAXAdesconto<-(VALORtotal*0.06)
               Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
            senao
               se ((Candidatos[i,3]) <= 20 ) então
                  TAXAdesconto<-(VALORtotal*0.01)
                  Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
               senao
                  se ((Candidatos[i,3]) > 20 )  então
                     TAXAdesconto<-(VALORtotal*0.02)
                     Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
                  fimse
               fimse
            fimse
         fimse



         //Condiçao Alunos Fora de Orlandia
      senao
         se  ((Candidatos[i,4]) = "informatica") então
               TAXAdesconto<-(VALORtotal*0.03)
               Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
            senao
               se ((Candidatos[i,4]) = "informatica") ou ((Candidatos[i,3]) = 16 ) então
                  TAXAdesconto<-(VALORtotal*0.05)
                  Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
            senao
               se ((Candidatos[i,4]) = "enfermagem") então
                  TAXAdesconto<-(VALORtotal*0.04)
                  Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
               fimse
            fimse
         fimse
      fimse

@Simon Viegas foi só ate aqui  que cheguei caara,preciso entrega esse trabalho amanha e não sei como..

  • Curtir 1
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado 
     //Condição ALunos de orlandia
      se ((Candidatos[i,2]) = "orlandia") então
         se ((Candidatos[i,3]) <= 20 ) então
            TAXAdesconto<-(VALORtotal*0.01)
            Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
         senao
            se  ((Candidatos[i,3]) > 20 )  então
               TAXAdesconto<-(VALORtotal*0.02)
               Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
            senao
               se ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,5]) = "tarde") e  ((Candidatos[i,3]) <= 16 ) então
                  TAXAdesconto<-(VALORtotal*0.06)
                  Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
               senao
                  se ((Candidatos[i,4]) = "informatica") então
                     TAXAdesconto<-(VALORtotal*0.1)
                     Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
                  fimse
               fimse
            fimse
         fimse

      senao se ((Candidatos[i,2]) <> "orlandia") então
         se((Candidatos[i,4]) = "informatica") então
            TAXAdesconto<-(VALORtotal*0.03)
            Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
         senao
            se ((Candidatos[i,4]) = "enfermagem") então
               TAXAdesconto<-(VALORtotal*0.04)
               Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
            senao
               se  ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,3]) = 16 ) então
                  TAXAdesconto<-(VALORtotal*0.05)
                  Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
               fimse
            fimse
         fimse
      fimse

 

adicionado 0 minutos depois
agora, Joao emilioborges disse: 

     //Condição ALunos de orlandia
      se ((Candidatos[i,2]) = "orlandia") então
         se ((Candidatos[i,3]) <= 20 ) então
            TAXAdesconto<-(VALORtotal*0.01)
            Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
         senao
            se  ((Candidatos[i,3]) > 20 )  então
               TAXAdesconto<-(VALORtotal*0.02)
               Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
            senao
               se ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,5]) = "tarde") e  ((Candidatos[i,3]) <= 16 ) então
                  TAXAdesconto<-(VALORtotal*0.06)
                  Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
               senao
                  se ((Candidatos[i,4]) = "informatica") então
                     TAXAdesconto<-(VALORtotal*0.1)
                     Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
                  fimse
               fimse
            fimse
         fimse

      senao se ((Candidatos[i,2]) <> "orlandia") então
         se((Candidatos[i,4]) = "informatica") então
            TAXAdesconto<-(VALORtotal*0.03)
            Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
         senao
            se ((Candidatos[i,4]) = "enfermagem") então
               TAXAdesconto<-(VALORtotal*0.04)
               Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
            senao
               se  ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,3]) = 16 ) então
                  TAXAdesconto<-(VALORtotal*0.05)
                  Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
               fimse
            fimse
         fimse
      fimse

 

fiz esse também mais nao deu certo!!Ve qual dos dois devo proseguir!

 

  • Curtir 1
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado

1 Eli esta pulando etapas ..tanto pra alunos de orlandia quanto pra alunos fora de orlandia esta dando erros ."Uma vez que eu coloque CIDADE:ORLANDIA

CURSO:INFORMATICA; PERIODO:TARDE ;IDADE:16 teria que ir no "senao" que da os 6% de desconto..e por ai vaii...

2 Fora que também quando coloco o codigo de "Produto nao cadastrado" quando o curso nao é nenhum desses cursos da erro também..

  • Curtir 2
  • Membro VIP
Simon Viegas
 

Simon Viegas

Postado
  • Membro VIP
Postado
4 horas atrás, Joao emilioborges disse:

1 Eli esta pulando etapas ..tanto pra alunos de orlandia quanto pra alunos fora de orlandia esta dando erros ."Uma vez que eu coloque CIDADE:ORLANDIA

CURSO:INFORMATICA; PERIODO:TARDE ;IDADE:16 teria que ir no "senao" que da os 6% de desconto..e por ai vaii...

Analise as condições... a condição 6% está contida na de 1%, logo deveria ser verificado antes... (todo 6% é também 1%, mas o oposto não é verdade, logo deve ser verificado a condição mais restrita antes)

 

4 horas atrás, Joao emilioborges disse:

2 Fora que também quando coloco o codigo de "Produto nao cadastrado" quando o curso nao é nenhum desses cursos da erro também..

Certo. Qual erro?

Mas de qualquer sorte, esse item é requisito do programa:
 

 

Em 01/05/2017 às 19:48, Joao emilioborges disse:

Mostrar a mensagem “Curso não cadastrado” quando diferente de Informática, Administração, Contabilidade, Enfermagem, Marketing, Farmácia, Ensino Médio, Jurídico, Informática para internet;

Ai é a questão é saber como vai tratar isso...  (o enunciando não diz). Eu acho que provavelmente deveria ler novamente o curso. (deixa a leitura dentro de um repita até que a resposta seja uma das opções válidas)

Obs.: seria interessante colocar a relação de curso antes de ler o curso... assim como também os turnos disponíveis... ou informa os cursos que estão disponíveis na hora que identificar que o curso está errado... (dentro desse repita teria um se que verificaria se é um curso não válido e exibiria o alerta... acho melhor exibir a relação antes de ler mesmo, qualquer coisa  testa as duas formas e ver qual fica melhor)

 

No aguardo.

adicionado 16 minutos depois

ADENDO:

Esses problemas devem ser necessariamente feitos em VisuAlg? ou poderiam ser feito em outra linguagem estrutural como o Pascal?

  • Curtir 1
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado 
      //Condição ALunos de orlandia
      se ((Candidatos[i,2]) = "orlandia") então
         se  ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,5]) = "tarde") e  ((Candidatos[i,3]) <= 16 ) então
            TAXAdesconto<-(VALORtotal*0.06)
            Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
         senao
            se ((Candidatos[i,4]) = "informatica") então
               TAXAdesconto<-(VALORtotal*0.1)
               Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
            senao
               se  ((Candidatos[i,3]) <= 20 ) então
                  TAXAdesconto<-(VALORtotal*0.01)
                  Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
               senao
                  se  ((Candidatos[i,3]) > 20 )  então
                     TAXAdesconto<-(VALORtotal*0.02)
                     Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
                  fimse
               fimse
            fimse
         fimse

         //Condiçao Alunos Fora de Orlandia
      senao se ((Candidatos[i,2]) <> "orlandia") então
         se  ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,3]) = 16 ) então
            TAXAdesconto<-(VALORtotal*0.05)
            Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
         senao
            se((Candidatos[i,4]) = "informatica") então
               TAXAdesconto<-(VALORtotal*0.03)
               Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
            senao
               se ((Candidatos[i,4]) = "enfermagem") então
                  TAXAdesconto<-(VALORtotal*0.04)
                  Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
               fimse
            fimse
         fimse
      fimse

Mesmo Erro !!FIz o que você me Disse

TEnta executar nessa ordem: nomealuno, CidadE=outras cidades, CUrso=informatica ,e Idade=16 ...continua caindo nos 3 Porcento!!!

  • Curtir 2
  • Membro VIP
Simon Viegas
 

Simon Viegas

Postado
  • Membro VIP
Postado

Ola. Talvez seja necessário converter a idade em número (está em caractere) assim poder comparar com um número (está comparando "caractere" com "número"). Eu fiz um teste usando o 16 como caractere (processo inverso): 

se  ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,3]) = "16" ) então

E funcionou...

 

Acho que seria mais coerente converter o "Candidatos[i,3]" para número e compara com 16 (como numeral)... veja ai

 

No aguardo.

adicionado 1 minuto depois

obs.: teoricamente toda parte que trata de números precisaria converte antes para número (o vetor armazena como caractere)...

  • Curtir 2
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado 
Algoritmo "Alcídio"
// Função : Criar Algoritmo para Vestibulinho Alcídio
// Autor : João Emilio
// Data : 01/05/2017
// Seção de Declarações
Var
   // Seção de Declarações das variáveis
   TOTALinformatica,TOTALadm,TOTALcontabilidade,TOTALenfermagem :inteiro
   TOTALmarketing,TOTALfarmacia, TOTALensinomedio,TOTALjuridico,TOTALinfinternet :inteiro
   Candidatos    :vetor[1..8,1..8] de caractere
   continuar     :caractere //flag para verificar se deseja continuar cadastrando
   MAXIMO,i      :inteiro  //maximo de Alunos possíveis
   quant         :inteiro  //quantidade de Alunos
   cont          :inteiro  //quantidade de impressões na tela (não imprimir tudo de vez)
   VALORtotal    :real
   TAXAdesconto  :real
   VALORpagar    :real
   TOTALdesconto :real
   TOTALarrecadado :real

Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   MAXIMO<- 8
   //CADASTRO DE Alunos
   continuar:="s"
   enquanto continuar <> "N" faca
      //APRESENTAÇÃO DO PROGRAMA
      escreval()
      escreval("=======================================")
      escreval("    ETEC Prof.Alcídio de Souza Prado   ")
      escreval("        Vestibulinho Alcídio           ")
      escreval("=======================================")
      escreval("          CURSOS OFERECIDOS            ")
      escreval("Informática/Inf. Para Internet/Farmácia")
      escreval("   Enfermagem/Marketing/Contabilidade  ")
      escreval("  Jurídico/Administração/Ensino Médio  ")
      escreval()
      escreval("               PERÍODO                 ")
      ESCREVAL("          <Manhã/Tarde/Noite>          ")
      escreval("=======================================")
      escreval()
      quant:=quant+1
      escreva("Nome do Candidato..: ")
      leia(Candidatos[quant,1])
      escreva("Cidade de Origem...: ")
      leia(Candidatos[quant,2])
      escreva("Idade..............: ")
      leia(Candidatos[quant,3])
      escreva("Curso Desejado.....: ")
      leia(Candidatos[quant,4])
      escreva("Período do Curso...: ")
      leia(Candidatos[quant,5])
      escreva("Preço do Manual....: R$ ")
      leia(Candidatos[quant,6])
      escreva("Preço da Inscrição.: R$ ")
      leia(Candidatos[quant,7])
      escreval()
      escreval()
      escreva("Quer Cadastrar Mais Um Candidato?  <  S/N   >  ")
      leia(continuar)
      se quant+1 > maximo então
         escreva("Só Pode Cadastrar Até",MAXIMO," Candidato...  Tecle Enter")
         leia(continuar)
         continuar:="n"
      fimse
      limpatela
   fimenquanto

   //Variáveis Zeradas
   limpatela
   cont<- 0
   para i de 1 ate quant faca
      //Exibição dos resultados
      escreval()
      cont:=cont+1
      escreval("Nome do Candidato ----> ",Candidatos[i,1])
      escreval("Cidade de Origem -----> ",Candidatos[i,2])
      escreval("Idade ----------------> ",caracpnum(Candidatos[i,3]))
      escreval("Curso Desejado -------> ",Candidatos[i,4])
      escreval("Período do Curso -----> ",Candidatos[i,5])
      escreval("Preço do Manual ------> R$ ",Candidatos[i,6])
      escreval("Preço da Inscrição ---> R$ ",Candidatos[i,7])

      //Cálculo Do Valor Total
      VALORtotal<-(caracpnum(Candidatos[i,6])+caracpnum(Candidatos[i,7]))
      Escreval("Valor Total de -------> R$ ",VALORtotal:3:2)

      //Condição ALunos de orlandia
      se ((Candidatos[i,2]) = "orlandia") então
         se  ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,5]) = "tarde") e  ((caracpnum(Candidatos[i,3]) <= 16 )) então
            TAXAdesconto<-(VALORtotal*0.06)
            Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
         senao
            se ((Candidatos[i,4]) = "informatica")  e ((caracpnum(Candidatos[i,3]) <> 16 ))então
               TAXAdesconto<-(VALORtotal*0.1)
               Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
            senao
               se  ((caracpnum(Candidatos[i,3]) <= 20 )) então
                  TAXAdesconto<-(VALORtotal*0.01)
                  Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
               senao
                  se  ((caracpnum(Candidatos[i,3]) > 20 ))  então
                     TAXAdesconto<-(VALORtotal*0.02)
                     Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
                  fimse
               fimse
            fimse
         fimse

         //Condiçao Alunos Fora de Orlandia
      senao se ((Candidatos[i,2]) <> "orlandia") então
         se  ((Candidatos[i,4]) = "informatica") e ((caracpnum(Candidatos[i,3]) = 16 )) então
            TAXAdesconto<-(VALORtotal*0.05)
            Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
         senao
            se((Candidatos[i,4]) = "informatica") e ((caracpnum(Candidatos[i,3]) <> 16 )) então
               TAXAdesconto<-(VALORtotal*0.03)
               Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
            senao
               se ((Candidatos[i,4]) = "enfermagem") então
                  TAXAdesconto<-(VALORtotal*0.04)
                  Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
               senao
                  TAXAdesconto<- 0
                  escreval("CURSO    ",(Candidatos[i,4]),"  NÃO TEM DESCONTO!!!")
               fimse
            fimse
         fimse
      fimse

      VALORpagar:=(VALORtotal-TAXAdesconto) //Cálculo do VALOR a PAgar
      TOTALdesconto:=(TOTALdesconto+TAXADESCONTO) //Acumula o DEScnto a dar pela Escola
      TOTALarrecadado:=(TOTALarrecadado+VALORpagar) //Acumula o Total que a EScola vai arrecadar

      //Mostra o  VALOR DE DESCONTO
      se TAXAdesconto <> 0 então
         Escreval("Valor do Desconto ----> R$ ",TAXAdesconto:3:2)
      fimse

      //MOSTRA O VALOR A PAGAR
      Escreval("Valor a Pagar --------> R$ ",VALORpagar:3:2)

      //Acumulador de ALunos Por curso
      se (Candidatos[i,4]="informatica") então
         TOTALinformatica:= TOTALinformatica+1
      senao
         se (Candidatos[i,4]="administracao") então
            TOTALadm:= TOTALadm+1
         senao
            se (Candidatos[i,4]="contabilidade") então
               TOTALcontabilidade:= TOTALcontabilidade+1
            senao
               se (Candidatos[i,4]="enfermagem") então
                  TOTALenfermagem:= TOTALenfermagem+1
               senao
                  se (Candidatos[i,4]="marketing") então
                     TOTALmarketing:= TOTALmarketing+1
                  senao
                     se (Candidatos[i,4]="farmacia") então
                        TOTALfarmacia:= TOTALfarmacia+1
                     senao
                        se(Candidatos[i,4]="ensino medio")então
                           TOTALensinomedio:= TOTALensinomedio+1
                        senao
                           se (Candidatos[i,4]="juridico")então
                              TOTALjuridico:= TOTALjuridico+1
                           senao
                              se (Candidatos[i,4]="informatica para internet") então
                                 TOTALinfinternet:= TOTALinfinternet+1
                              fimse
                           fimse
                        fimse
                     fimse
                  fimse
               fimse
            fimse
         fimse
      fimse
   fimpara


   se cont=8 então  //Contador de Pessoas Impressas na TEla
      cont:=0
      escreval()
      escreval("Tecle Enter Para Continuar")
      leia(continuar)
   fimse



   //TOTAL
   escreval()
   escreval("=====================================================")
   escreval("Total de ALunos Inscritos Curso de Informática -----> ",TOTALinformatica)
   escreval("Total de ALunos Inscritos Curso de Administração ---> ",TOTALadm)
   escreval("Total de ALunos Inscritos Curso de Contabilidade ---> ",TOTALcontabilidade)
   escreval("Total de ALunos Inscritos Curso de Enfermagem ------> ",TOTALenfermagem)
   escreval("Total de ALunos Inscritos Curso de Marketing -------> ",TOTALmarketing)
   escreval("Total de ALunos Inscritos Curso de Farmácia --------> ",TOTALfarmacia)
   escreval("Total de ALunos Inscritos Curso de Ensino Médio ----> ",TOTALensinomedio)
   escreval("Total de ALunos Inscritos Curso de Jurídico --------> ",TOTALjuridico)
   escreval("Total de ALunos Inscritos Curso de Informática Pra Internet --> ",TOTALinfinternet)
   escreval()
   escreval("Valor Total Concedido em Descontos Pela ETEC -> ",TOTALdesconto:3:2)
   escreval("Valor Total Arrecadado pela ETEC ALcídio -----> ",TOTALarrecadado:3:2)
   escreval("=====================================================")
fimalgoritmo

Até Aqui está pronto! So falta o negocio do "Produto nao cadastrado "que eu não entendi o que você quis dizer onde por oo repita!!

  • Curtir 1
  • Membro VIP
Simon Viegas
 

Simon Viegas

Postado
  • Membro VIP
Postado

Olá.

 

1 hora atrás, Joao emilioborges disse:

Até Aqui está pronto! So falta o negocio do "Produto nao cadastrado "que eu não entendi o que você quis dizer onde por oo repita!!

 

Citando:

Em 01/05/2017 às 19:48, Joao emilioborges disse:

Mostrar a mensagem “Curso não cadastrado” quando diferente de Informática, Administração, Contabilidade, Enfermagem, Marketing, Farmácia, Ensino Médio, Jurídico, Informática para internet

Então, o que deve ser feito em relação a essa restrição,  mostrar logo após ler esse dado ou em outro momento como na hora de "calcular"? como fica o cálculo em relação a essa questão?

 

A sua tarefa primeiro é tentar entender o problema, para depois tentar achar uma solução... tente entender esse contexto... releia também a minha postagem que fala sobre isso.

 

No aguardo.

adicionado 8 minutos depois

PS: são duas etapas. 1-tentar entender o problema. 2-tentar implementar uma solução. Para ambos podemos ajudar, é claro, mas quanto mais batemos cabeça para descobrir, mais ganhamos experiência e habilidade para resolver outros problemas semelhantes. Vale a pena "a dor de cabeça", essa experiência vai para vida... independente de linguagem... ajuda a enxergar o mundo de forma diferente. Garanto!

  • Curtir 2
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado 
Algoritmo "Alcídio"
// Função : Criar Algoritmo para Vestibulinho Alcídio
// Autor : João Emilio
// Data : 01/05/2017
// Seção de Declarações
Var
   // Seção de Declarações das variáveis
   TOTALinformatica,TOTALadm,TOTALcontabilidade,TOTALenfermagem :inteiro
   TOTALmarketing,TOTALfarmacia, TOTALensinomedio,TOTALjuridico,TOTALinfinternet :inteiro
   Candidatos    :vetor[1..20,1..20] de caractere
   continuar     :caractere //flag para verificar se deseja continuar cadastrando
   MAXIMO,i      :inteiro  //maximo de Alunos possíveis
   quant         :inteiro  //quantidade de Alunos
   cont          :inteiro  //quantidade de impressões na tela (não imprimir tudo de vez)
   VALORtotal    :real
   TAXAdesconto  :real
   VALORpagar    :real
   TOTALdesconto :real
   TOTALarrecadado :real
   VALORtotal2     :real
Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   MAXIMO<- 8
   //CADASTRO DE Alunos
   continuar:="s"
   enquanto continuar <> "N" faca
      //APRESENTAÇÃO DO PROGRAMA
      escreval()
      escreval("=======================================")
      escreval("    ETEC Prof.Alcídio de Souza Prado   ")
      escreval("        Vestibulinho Alcídio           ")
      escreval("=======================================")
      escreval("          CURSOS OFERECIDOS            ")
      escreval("Informática/Inf. Para Internet/Farmácia")
      escreval("   Enfermagem/Marketing/Contabilidade  ")
      escreval("  Jurídico/Administração/Ensino Médio  ")
      escreval()
      escreval("               PERÍODO                 ")
      ESCREVAL("          <Manhã/Tarde/Noite>          ")
      escreval("=======================================")
      escreval()
      quant:=quant+1
      escreva("Nome do Candidato..: ")
      leia(Candidatos[quant,1])
      escreva("Cidade de Origem...: ")
      leia(Candidatos[quant,2])
      escreva("Idade..............: ")
      leia(Candidatos[quant,3])
      escreva("Curso Desejado.....: ")
      leia(Candidatos[quant,4])
      escreva("Período do Curso...: ")
      leia(Candidatos[quant,5])
      escreva("Preço do Manual....: R$ ")
      leia(Candidatos[quant,6])
      escreva("Preço da Inscrição.: R$ ")
      leia(Candidatos[quant,7])
      escreval()
      escreval()
      escreva("Quer Cadastrar Mais Um Candidato?  <  S/N   >  ")
      leia(continuar)
      se quant+1 > maximo então
         escreva("Só Pode Cadastrar Até",MAXIMO," Candidato...  Tecle Enter")
         leia(continuar)
         continuar:="n"
      fimse
      limpatela
   fimenquanto

   //Variáveis Zeradas
   limpatela
   cont<- 0
   para i de 1 ate quant faca
      //Exibição dos resultados
      escreval()
      cont:=cont+1
      escreval("Nome do Candidato ----> ",Candidatos[i,1])
      escreval("Cidade de Origem -----> ",Candidatos[i,2])
      escreval("Idade ----------------> ",caracpnum(Candidatos[i,3]))
      escreval("Curso Desejado -------> ",Candidatos[i,4])
      escreval("Período do Curso -----> ",Candidatos[i,5])
      escreval("Preço do Manual ------> R$ ",Candidatos[i,6])
      escreval("Preço da Inscrição ---> R$ ",Candidatos[i,7])

      //Cálculo Do Valor Total

      VALORtotal:=(caracpnum(Candidatos[i,6])+caracpnum(Candidatos[i,7]))
      VALORtotal2:=VALORtotal2+VALORtotal


      se ((Candidatos[i,4]) <> "informatica") e ((Candidatos[i,4]) <> "administracao")  e ((Candidatos[i,4]) <> "contabilidade") ou ((Candidatos[i,4]) = "enfermagem") e ((Candidatos[i,4]) <> "marketing") e ((Candidatos[i,4]) <> "farmacia") e ((Candidatos[i,4]) <> "ensino medio") e ((Candidatos[i,4]) <> "juridico") e ((Candidatos[i,4]) <> "informatica para internet") então
         VALORtotal2:=0
         escreval("Curso não Cadastrado/Tecle Enter Para Continuar")
         leia(continuar)
      fimse


      se VALORtotal2 <> 0 então
         Escreval("Valor Total de -------> R$ ",VALORtotal:3:2)

         //Condição ALunos de orlandia
         se ((Candidatos[i,2]) = "orlandia") então
            se  ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,5]) = "tarde") e  ((caracpnum(Candidatos[i,3]) <= 16 )) então
               TAXAdesconto<-(VALORtotal*0.06)
               Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
            senao
               se ((Candidatos[i,4]) = "informatica")  e ((caracpnum(Candidatos[i,3]) <> 16 ))então
                  TAXAdesconto<-(VALORtotal*0.1)
                  Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
               senao
                  se  ((caracpnum(Candidatos[i,3]) <= 20 )) então
                     TAXAdesconto<-(VALORtotal*0.01)
                     Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
                  senao
                     se  ((caracpnum(Candidatos[i,3]) > 20 ))  então
                        TAXAdesconto<-(VALORtotal*0.02)
                        Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
                     fimse
                  fimse
               fimse
            fimse

            //Condiçao Alunos Fora de Orlandia
         senao se ((Candidatos[i,2]) <> "orlandia") então
            se  ((Candidatos[i,4]) = "informatica") e ((caracpnum(Candidatos[i,3]) = 16 )) então
               TAXAdesconto<-(VALORtotal*0.05)
               Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
            senao
               se((Candidatos[i,4]) = "informatica") e ((caracpnum(Candidatos[i,3]) <> 16 )) então
                  TAXAdesconto<-(VALORtotal*0.03)
                  Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
               senao
                  se ((Candidatos[i,4]) = "enfermagem") então
                     TAXAdesconto<-(VALORtotal*0.04)
                     Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
                  senao
                     TAXAdesconto<- 0
                     escreval("CURSO    ",(Candidatos[i,4]),"  NÃO TEM DESCONTO!!!")
                  fimse
               fimse
            fimse
         fimse


         VALORpagar:=(VALORtotal-TAXAdesconto) //Cálculo do VALOR a PAgar
         TOTALdesconto:=(TOTALdesconto+TAXADESCONTO) //Acumula o DEScnto a dar pela Escola
         TOTALarrecadado:=(TOTALarrecadado+VALORpagar) //Acumula o Total que a EScola vai arrecadar

         //Mostra o  VALOR DE DESCONTO
         se TAXAdesconto <> 0 então
            Escreval("Valor do Desconto ----> R$ ",TAXAdesconto:3:2)
         fimse

         //MOSTRA O VALOR A PAGAR
         se VALORtotal <> 0 então
            Escreval("Valor a Pagar --------> R$ ",VALORpagar:3:2)
         fimse
      fimse

      //Acumulador de ALunos Por curso
      se (Candidatos[i,4]="informatica") então
         TOTALinformatica:= TOTALinformatica+1
      senao
         se (Candidatos[i,4]="administracao") então
            TOTALadm:= TOTALadm+1
         senao
            se (Candidatos[i,4]="contabilidade") então
               TOTALcontabilidade:= TOTALcontabilidade+1
            senao
               se (Candidatos[i,4]="enfermagem") então
                  TOTALenfermagem:= TOTALenfermagem+1
               senao
                  se (Candidatos[i,4]="marketing") então
                     TOTALmarketing:= TOTALmarketing+1
                  senao
                     se (Candidatos[i,4]="farmacia") então
                        TOTALfarmacia:= TOTALfarmacia+1
                     senao
                        se(Candidatos[i,4]="ensino medio")então
                           TOTALensinomedio:= TOTALensinomedio+1
                        senao
                           se (Candidatos[i,4]="juridico")então
                              TOTALjuridico:= TOTALjuridico+1
                           senao
                              se (Candidatos[i,4]="informatica para internet") então
                                 TOTALinfinternet:= TOTALinfinternet+1
                              fimse
                           fimse
                        fimse
                     fimse
                  fimse
               fimse
            fimse
         fimse
      fimse
   fimpara


   se cont=8 então  //Contador de Pessoas Impressas na TEla
      cont:=0
      escreval()
      escreval("Tecle Enter Para Continuar")
      leia(continuar)
   fimse



   //TOTAL
   escreval()
   escreval("=====================================================")
   escreval("Total de Candidatos Foram Fazer Inscrição ----------> ",quant)
   escreval("Total de ALunos Inscritos Curso de Informática -----> ",TOTALinformatica)
   escreval("Total de ALunos Inscritos Curso de Administração ---> ",TOTALadm)
   escreval("Total de ALunos Inscritos Curso de Contabilidade ---> ",TOTALcontabilidade)
   escreval("Total de ALunos Inscritos Curso de Enfermagem ------> ",TOTALenfermagem)
   escreval("Total de ALunos Inscritos Curso de Marketing -------> ",TOTALmarketing)
   escreval("Total de ALunos Inscritos Curso de Farmácia --------> ",TOTALfarmacia)
   escreval("Total de ALunos Inscritos Curso de Ensino Médio ----> ",TOTALensinomedio)
   escreval("Total de ALunos Inscritos Curso de Jurídico --------> ",TOTALjuridico)
   escreval("Total de ALunos Inscritos Curso de Informática Pra Internet --> ",TOTALinfinternet)
   escreval()
   escreval("Valor Total Concedido em Descontos Pela ETEC -> ",TOTALdesconto:3:2)
   escreval("Valor Total Arrecadado pela ETEC ALcídio -----> ",TOTALarrecadado:3:2)
   escreval("=====================================================")
fimalgoritmo

@Simon Viegas è isso que tem de fazer cara??

  • Curtir 1
  • Membro VIP
Simon Viegas
 

Simon Viegas

Postado
  • Membro VIP
Postado

Olá @Joao emilioborges.

 

Primeiro você precisaria me dizer o que você entendeu do que está sendo pedido...

Em 04/05/2017 às 14:22, Simon Viegas disse:

Então, o que deve ser feito em relação a essa restrição,  mostrar logo após ler esse dado ou em outro momento como na hora de "calcular"? como fica o cálculo em relação a essa questão?

 

É para apenas ignorar o cadastro do cara ou seria para ler novamente o curso? Pelo seu código eu entendi que apenas exibiria uma resposta e ignoraria os dados dele... contaria apenas como "Foram Fazer Inscrição". Logo, acho que ficou tudo certinho agora...

 

NO SENTIDO DE APRIMORAMENTOS:

Sugestão 1: acho poderia troca os se que conta o total por curso para escola...caso. Terá exatamente o mesmo resultado, mas ficará mais organizado. Algo assim: 

      escolha Candidatos[i,4]
         caso "informatica"
            TOTALinformatica:= TOTALinformatica+1
         caso "administracao"
            TOTALadm:= TOTALadm+1




      fimEscolha

Obs.: ":=" está funcionando? não seria "<-"  ???

 

Sugestão 2: peça para alguém que não participou da criação fazer testes... o ideal é chamar alguém da casa, e pedir para rodar o programa... não dizer nada, apenas que tente seguir os passos... entende? deixe usar sozinho, sem que você dê dicas...   tente analisar os possíveis problemas (vai aparecer! rs), analisar se vale apenas ou não tentar corrigir. Esse passo é também interessante pois pode encontrar erros de fato (não só melhorias em si). Ai, tem que corrigir mesmo!

 

Sugestão 3:

...por ai vai.

 

 

 

No aguardo.

 

 

  • Curtir 1
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado

então Simon eu queria ignorar esse cara .tipo ..se curso nao for cadastrado então ja partir pra outro candidato ..Do jeito que você me falou não ficou muito claro !!

 

Vou dxar de exemlpo um outro algoritmo que fiz ai você tira umas conclusões!!

segue abaixo >>>

adicionado 5 minutos depois 
Algoritmo "Universidade"
// Função : Criar Algoritmo para Universidade
// Autor : João Emilio
// Data : 25/04/2017
// Seção de Declarações
Var
   // Seção de Declarações das variáveis
   VALORmedicina,VALORinformatica,VALORodonto,VALORjornalismo,VALORpublicidade :real
   QTmedicina,QTinformatica,QTodontologia,QTjornalismo,QTpublicidade :inteiro
   Alunos        :vetor[1..20,1..8] de caractere
   continuar     :caractere //flag para verificar se deseja continuar cadastrando
   MAXIMO,i      :inteiro  //maximo de Alunos possíveis
   quant         :inteiro  //quantidade de Alunos   
   Pdc           :real
   PRECOtotal    :real
   Bonus         :real
   VALORpagar    :real
   TOTALuniversidade       :real

Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   MAXIMO<- 7
   //CADASTRO DE Alunos
   continuar:="s"
   enquanto continuar <> "N" faca
      //APRESENTAÇÃO DO PROGRAMA
      escreval()
      escreval("================================")
      escreval("ETEC Prof.Alcídio de Souza Prado")
      escreval("      Universidade Alcídio      ")
      escreval("================================")
      escreval()
      quant:=quant+1
      escreva("Nome do Aluno..........: ")
      leia(Alunos[quant,1])
      escreval("Medicina >< Informática >< Odontologia >< Jornalismo >< Publicidade ")
      escreva("Descrição do Curso.....: ")
      leia(Alunos[quant,2])
      escreva("Idade do Aluno.........: ")
      leia(Alunos[quant,3])
      escreval()
      escreval()
      escreva("Quer Cadastrar Mais Um Aluno?  <  S/N   >  ")
      leia(continuar)
      se quant+1 > maximo então
         escreva("Só Pode Cadastrar Até",MAXIMO," Alunos...  Tecle Enter")
         leia(continuar)
         continuar:="n"
      fimse
      limpatela
   fimenquanto

   //Variáveis Zeradas
   limpatela   
   para i de 1 ate quant faca

      //Exibição dos resultados
      escreval()     
      escreval("Nome do Aluno -------> ",Alunos[i,1])
      escreval("Descrição do Curso --> ",Alunos[i,2])
      escreval("Idade do Aluno ------> ",Alunos[i,3])


      //Cálculo dos Produtos
      se (Alunos[i,2]="medicina")  então
         QTmedicina:=QTmedicina+1
         Pdc <- 2000
         Escreval("PREÇO DO CURSO DE MEDICINA -----> R$ 2000,00")
         Bonus<- (Pdc * 0.01)  //Cálculo do Bônus
      senao
         se (Alunos[i,2]="informatica")  então
            QTinformatica:=QTinformatica+1
            Pdc <- 800
            Escreval("PREÇO DO CURSO DE INFORMÁTICA --> R$ 800,00")
            Bonus<- (Pdc * 0.02)   //Cálculo do Bônus
         senao
            se (Alunos[i,2]="odontologia")  então
               QTodontologia:=QTodontologia+1
               Pdc <- 1800
               Escreval("PREÇO DO CURSO DE ODONTOLOGIA --> R$ 1800,00")
               Bonus<- (Pdc * 0.03)  //Cálculo do Bônus
            senao
               se (Alunos[i,2]="jornalismo")  então
                  QTjornalismo:=QTjornalismo+1
                  Pdc <- 1000
                  Escreval("PREÇO DO CURSO DE JORNALISMO ---> R$ 1000,00")
                  Bonus<- (Pdc * 0.04)  //Cálculo do Bônus
               senao
                  se (Alunos[i,2]="publicidade")  então
                     QTpublicidade:=QTpublicidade+1
                     Pdc <- 700
                     Escreval("PREÇO DO CURSO DE PUBLICIDADE --> R$ 700,00")
                     Bonus<- (Pdc * 0.05)  //Cálculo do Bônus
                  senao
                     Pdc <- 0
                     Escreval("**CURSO NÃO CADASTRADO**    Tecle Enter ")
                     Bonus<- 0
                     leia(continuar)
                  fimse
               fimse
            fimse
         fimse
      fimse

      //Cálculos
      VALORpagar <-(Pdc-Bonus)  //Cálculo Valor a Pagar

      //Exibe o Bônus/Valor a Pagar
      se Pdc <> 0 então
         escreval("Valor do Bônus de --------------> R$ ",Bonus:3:2)
         escreval("Valor a Pagar de ---------------> R$ ",VALORpagar:3:2)
      fimse

      //Comando para imprimir valor total recebido nos cursos
      se (Alunos[i,2]="medicina") então
         VALORmedicina<-(VALORmedicina+VALORpagar)
      senao
         se (Alunos[i,2]="informatica")  então
            VALORinformatica<-(VALORinformatica+VALORpagar)
         senao
            se (Alunos[i,2]="odontologia") então
               VALORodonto<-(VALORodonto+VALORpagar)
            senao
               se (Alunos[i,2]="jornalismo")  então
                  VALORjornalismo<-(VALORjornalismo+VALORpagar)
               senao
                  se (Alunos[i,2]="publicidade")  então
                     VALORpublicidade<-(VALORpublicidade+VALORpagar)
                  fimse
               fimse
            fimse
         fimse
      fimse

      //CálculA o Valor  que a Universidade Tem a Receber
      TOTALuniversidade<-(TOTALuniversidade+Bonus)

   fimpara

   //TOTAL
   escreval()
   escreval("==============================================")
   escreval("Total de Alunos Com Desconto de 1% ------> ",QTmedicina)
   escreval("Total de Alunos Com Desconto de 2% ------> ",QTinformatica)
   escreval("Total de Alunos Com Desconto de 3% ------> ",QTodontologia)
   escreval("Total de Alunos Com Desconto de 4% ------> ",QTjornalismo)
   escreval("Total de Alunos Com Desconto de 5% ------> ",QTpublicidade)
   escreval()
   escreval("Valor Total recebido do Curso Medicina ------> R$ ",VALORmedicina:3:2)
   escreval("Valor Total recebido do Curso Informática ---> R$ ",VALORinformatica:3:2)
   escreval("Valor Total recebido do Curso Odontologia ---> R$ ",VALORodonto:3:2)
   escreval("Valor Total recebido do Curso Jornalismo ----> R$ ",VALORjornalismo:3:2)
   escreval("Valor Total recebido do Curso Publicidade ---> R$ ",VALORpublicidade:3:2)
   escreval()
   escreval("Valor Total Concedido em Bônus Pela Universidade ---> R$ ",TOTALuniversidade:3:2)
   escreval("================================================")
fimalgoritmo

 

 

 

esse è o outro Algoritmo que fiz !!Esse do Alcídio era Pra ser assim também!!

Universidade.txt

  • Curtir 1
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado
agora, Simon Viegas disse:

Ola.@Joao emilioborges, para outro algoritmo, por favor, crie outro tópico..

esse esta pronto !so postei pra você ver onde estou tentando chegar..se quiser que eu apague ele eu apago.Testa ele e ve como ficou ..eu quero que o do "Vestibulinho Alcídio"fique mais ou menos igual esse "Universidade Alcídio"

  • Curtir 2
  • Membro VIP
Simon Viegas
 

Simon Viegas

Postado
  • Membro VIP
Postado

É.. pelo que eu vi a base dos programas são semelhantes... para mim tá OK!

 

obs.: como as condições para calcular o desconto e para contar a quantidade por curso são as mesmas, poderia juntar ou coisa com a outra, ou seja, lá contar a quantidade ao calcular o preço...

 

Nesse código eu também colocaria um escolha..caso no lugar do conjunto de se..senao. Ou troca para ambos os conjuntos ou deixaria um só mesmo como sugeri acima.

 

No aguardo.

  • Curtir 1
Joao emilioborges
 

Joao emilioborges

Postado
  • Autor
Postado
2 horas atrás, Simon Viegas disse:

É.. pelo que eu vi a base dos programas são semelhantes... para mim tá OK!

 

obs.: como as condições para calcular o desconto e para contar a quantidade por curso são as mesmas, poderia juntar ou coisa com a outra, ou seja, lá contar a quantidade ao calcular o preço...

 

Nesse código eu também colocaria um escolha..caso no lugar do conjunto de se..senao. Ou troca para ambos os conjuntos ou deixaria um só mesmo como sugeri acima.

 

No aguardo.

A condição para calcular o desconto não é a mesma naõ! Porque no senao não tem as condiçoes de outros curso como Marketing.....

adicionado 53 minutos depois 
Algoritmo "Alcídio"
// Função : Criar Algoritmo para Vestibulinho Alcídio
// Autor : João Emilio
// Data : 01/05/2017
// Seção de Declarações
Var
   // Seção de Declarações das variáveis
   TOTALinformatica,TOTALadm,TOTALcontabilidade,TOTALenfermagem :inteiro
   TOTALmarketing,TOTALfarmacia, TOTALensinomedio,TOTALjuridico,TOTALinfinternet :inteiro
   Candidatos    :vetor[1..20,1..20] de caractere
   continuar     :caractere //flag para verificar se deseja continuar cadastrando
   MAXIMO,i      :inteiro  //maximo de Alunos possíveis
   quant         :inteiro  //quantidade de Alunos
   cont          :inteiro  //quantidade de impressões na tela (não imprimir tudo de vez)
   VALORtotal    :real
   TAXAdesconto  :real
   VALORpagar    :real
   TOTALdesconto :real
   TOTALarrecadado :real


Inicio
   // Seção de Comandos, procedimento, funções, operadores, etc...
   MAXIMO<- 8
   //CADASTRO DE Alunos
   continuar:="s"
   enquanto continuar <> "N" faca
      //APRESENTAÇÃO DO PROGRAMA
      escreval()
      escreval("=======================================")
      escreval("    ETEC Prof.Alcídio de Souza Prado   ")
      escreval("        Vestibulinho Alcídio           ")
      escreval("=======================================")
      escreval("          CURSOS OFERECIDOS            ")
      escreval("Informática/Inf. Para Internet/Farmácia")
      escreval("   Enfermagem/Marketing/Contabilidade  ")
      escreval("  Jurídico/Administração/Ensino Médio  ")
      escreval()
      escreval("               PERÍODO                 ")
      ESCREVAL("          <Manhã/Tarde/Noite>          ")
      escreval("=======================================")
      escreval()
      quant:=quant+1
      escreva("Nome do Candidato..: ")
      leia(Candidatos[quant,1])
      escreva("Cidade de Origem...: ")
      leia(Candidatos[quant,2])
      escreva("Idade..............: ")
      leia(Candidatos[quant,3])
      escreva("Curso Desejado.....: ")
      leia(Candidatos[quant,4])
      escreva("Período do Curso...: ")
      leia(Candidatos[quant,5])
      escreva("Preço do Manual....: R$ ")
      leia(Candidatos[quant,6])
      escreva("Preço da Inscrição.: R$ ")
      leia(Candidatos[quant,7])
      escreval()
      escreval()
      escreva("Quer Cadastrar Mais Um Candidato?  <  S/N   >  ")
      leia(continuar)
      se quant+1 > maximo então
         escreva("Só Pode Cadastrar Até",MAXIMO," Candidato...  Tecle Enter")
         leia(continuar)
         continuar:="n"
      fimse
      limpatela
   fimenquanto

   //Variáveis Zeradas
   limpatela
   para i de 1 ate quant faca
      //Exibição dos resultados
      repita
         escreval()
         escreval("Nome do Candidato ----> ",Candidatos[i,1])
         escreval("Cidade de Origem -----> ",Candidatos[i,2])
         escreval("Idade ----------------> ",caracpnum(Candidatos[i,3]))
         escreval("Curso Desejado -------> ",Candidatos[i,4])
         escreval("Período do Curso -----> ",Candidatos[i,5])
         escreval("Preço do Manual ------> R$ ",Candidatos[i,6])
         escreval("Preço da Inscrição ---> R$ ",Candidatos[i,7])

         //Cálculo Do Valor Total
         se ((Candidatos[i,4]) <> "informatica") e ((Candidatos[i,4]) <> "administracao")  e ((Candidatos[i,4]) <> "contabilidade") e ((Candidatos[i,4]) <> "enfermagem") e((Candidatos[i,4]) <> "marketing") e ((Candidatos[i,4]) <> "farmacia") e ((Candidatos[i,4]) <> "ensino medio") e ((Candidatos[i,4]) <> "juridico") e ((Candidatos[i,4]) <> "informatica para internet") então
            escreval("Curso não Cadastrado")
            leia(continuar)
            interrompa
         senao

            VALORtotal<-(caracpnum(Candidatos[i,6])+caracpnum(Candidatos[i,7]))
            Escreval("Valor Total de -------> R$ ",VALORtotal:3:2)

            //Condição ALunos de orlandia
            se ((Candidatos[i,2]) = "orlandia") então
               se  ((Candidatos[i,4]) = "informatica") e ((Candidatos[i,5]) = "tarde") e  ((caracpnum(Candidatos[i,3]) <= 16 )) então
                  TAXAdesconto<-(VALORtotal*0.06)
                  Escreval("DESCONTO DE 6% Alunos de Orlândia, Inscritos para Informática, Período da Tarde, com Idade até 16 anos")
               senao
                  se ((Candidatos[i,4]) = "informatica")  e ((caracpnum(Candidatos[i,3]) <> 16 ))então
                     TAXAdesconto<-(VALORtotal*0.1)
                     Escreval("DESCONTO DE 10% Alunos de Orlândia, Inscritos para Informática")
                  senao
                     se  ((caracpnum(Candidatos[i,3]) <= 20 )) então
                        TAXAdesconto<-(VALORtotal*0.01)
                        Escreval("DESCONTO DE 1% Alunos de Orlândia, com Idade até 20 anos")
                     senao
                        se  ((caracpnum(Candidatos[i,3]) > 20 ))  então
                           TAXAdesconto<-(VALORtotal*0.02)
                           Escreval("DESCONTO DE 2% Alunos de Orlândia, com Idade MAIOR DE 20 anos")
                        fimse
                     fimse
                  fimse
               fimse

               //Condiçao Alunos Fora de Orlandia
            senao se ((Candidatos[i,2]) <> "orlandia") então
               se  ((Candidatos[i,4]) = "informatica") e ((caracpnum(Candidatos[i,3]) = 16 )) então
                  TAXAdesconto<-(VALORtotal*0.05)
                  Escreval("DESCONTO DE 5% Alunos de OUTRAS CIDADES, Inscritos para Informática e Idade igual a 16 anos")
               senao
                  se((Candidatos[i,4]) = "informatica") e ((caracpnum(Candidatos[i,3]) <> 16 )) então
                     TAXAdesconto<-(VALORtotal*0.03)
                     Escreval("DESCONTO DE 3% Alunos de OUTRAS CIDADES, Inscritos para Informática")
                  senao
                     se ((Candidatos[i,4]) = "enfermagem") então
                        TAXAdesconto<-(VALORtotal*0.04)
                        Escreval("DESCONTO DE 4% Alunos de OUTRAS CIDADES, Incritos para Enfermagem")
                     senao
                        TAXAdesconto<- 0
                        escreval("CURSO    ",(Candidatos[i,4]),"  NÃO TEM DESCONTO!!!")
                     fimse
                  fimse
               fimse
            fimse
         fimse

         VALORpagar:=(VALORtotal-TAXAdesconto) //Cálculo do VALOR a PAgar
         TOTALdesconto:=(TOTALdesconto+TAXADESCONTO) //Acumula o DEScnto a dar pela Escola
         TOTALarrecadado:=(TOTALarrecadado+VALORpagar) //Acumula o Total que a EScola vai arrecadar

         //Mostra o  VALOR DE DESCONTO  E Valor a Pagar
         Escreval("Valor do Desconto ----> R$ ",TAXAdesconto:3:2)
         Escreval("Valor a Pagar --------> R$ ",VALORpagar:3:2)


         //Acumulador de ALunos Por curso
         se (Candidatos[i,4]="informatica") então
            TOTALinformatica:= TOTALinformatica+1
         senao
            se (Candidatos[i,4]="administracao") então
               TOTALadm:= TOTALadm+1
            senao
               se (Candidatos[i,4]="contabilidade") então
                  TOTALcontabilidade:= TOTALcontabilidade+1
               senao
                  se (Candidatos[i,4]="enfermagem") então
                     TOTALenfermagem:= TOTALenfermagem+1
                  senao
                     se (Candidatos[i,4]="marketing") então
                        TOTALmarketing:= TOTALmarketing+1
                     senao
                        se (Candidatos[i,4]="farmacia") então
                           TOTALfarmacia:= TOTALfarmacia+1
                        senao
                           se(Candidatos[i,4]="ensino medio")então
                              TOTALensinomedio:= TOTALensinomedio+1
                           senao
                              se (Candidatos[i,4]="juridico")então
                                 TOTALjuridico:= TOTALjuridico+1
                              senao
                                 se (Candidatos[i,4]="informatica para internet") então
                                    TOTALinfinternet:= TOTALinfinternet+1
                                 fimse
                              fimse
                           fimse
                        fimse
                     fimse
                  fimse
               fimse
            fimse
         fimse


      ate ((Candidatos[quant,4]) = "informatica") ou ((Candidatos[quant,4]) = "administracao")  ou ((Candidatos[quant,4]) = "contabilidade") ou ((Candidatos[quant,4]) = "enfermagem") ou ((Candidatos[quant,4]) = "marketing") ou ((Candidatos[quant,4]) = "farmacia") ou ((Candidatos[quant,4]) = "ensino medio") ou ((Candidatos[quant,4]) = "juridico") ou ((Candidatos[quant,4]) = "informatica para internet")
   fimpara

   //TOTAL
   escreval()
   escreval("=====================================================")
   escreval("Total de Candidatos Impressos na Tela --------------> ",quant)
   escreval("Total de ALunos Inscritos Curso de Informática -----> ",TOTALinformatica)
   escreval("Total de ALunos Inscritos Curso de Administração ---> ",TOTALadm)
   escreval("Total de ALunos Inscritos Curso de Contabilidade ---> ",TOTALcontabilidade)
   escreval("Total de ALunos Inscritos Curso de Enfermagem ------> ",TOTALenfermagem)
   escreval("Total de ALunos Inscritos Curso de Marketing -------> ",TOTALmarketing)
   escreval("Total de ALunos Inscritos Curso de Farmácia --------> ",TOTALfarmacia)
   escreval("Total de ALunos Inscritos Curso de Ensino Médio ----> ",TOTALensinomedio)
   escreval("Total de ALunos Inscritos Curso de Jurídico --------> ",TOTALjuridico)
   escreval("Total de ALunos Inscritos Curso de Informática Pra Internet --> ",TOTALinfinternet)
   escreval()
   escreval("Valor Total Concedido em Descontos Pela ETEC -> ",TOTALdesconto:3:2)
   escreval("Valor Total Arrecadado pela ETEC ALcídio -----> ",TOTALarrecadado:3:2)
   escreval("=====================================================")
fimalgoritmo

Até que enfim consegui!! Obrigado pela sua ajuda @Simon Viegas

  • Curtir 2
Visitante
Este tópico está impedido de receber novas respostas.
 Compartilhar
Ir à lista de tópicos

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

Mais

×
×
  • Criar novo...

LANÇAMENTO!

eletronica2025-popup.jpg


CLIQUE AQUI E BAIXE AGORA MESMO!