Ir ao conteúdo
  • Cadastre-se

Joao emilioborges

Membro Pleno
 Perfil  Explorar Conteúdo

  • Posts

    48

  • Cadastrado em

  • Última visita

 Tipo de conteúdo 

Tudo que Joao emilioborges postou

  1. Joao emilioborges
    DIF Desculpa lhe incomodar novamente mais consegui mandar meus pedidos para o banco com o seguinte código ..só tem uma coisa que não estou conseguindo que é ADD no carrinho o mesmo produto o tanto de vezes que eu clicar .Poderia me ajudar com isso?Já tierei os código que altera a quantidade e nada acontece .. <?php session_start(); if(!isset($_SESSION['carrinho'])){ $_SESSION['carrinho'] = array(); } //adiciona produto if(isset($_GET['acao'])){ //ADICIONAR CARRINHO if($_GET['acao'] == 'add'){ $id = intval($_GET['id']); if(!isset($_SESSION['carrinho'][$id])){ $_SESSION['carrinho'][$id] = +1; } } //REMOVER CARRINHO if($_GET['acao'] == 'del'){ $id = intval($_GET['id']); if(isset($_SESSION['carrinho'][$id])){ unset($_SESSION['carrinho'][$id]); } } } ?> <!DOCTYPE html> <html lang="en"> <head> <meta charset="UTF-8"> <title>Carrinho</title> <link rel="stylesheet" href="Css/estilo_carrinho.css" /> <style type="text/css"> #content{ overflow:auto; padding:10px; text-align:justify; } </style> </head> <body> <div id="content" style="width: 730px; height: 430px !important;"> <table width="100%" border="0" cellpadding="0" class="table table-strip" > <div class="container"> <div class="card-body"> <h3 class="card-title" align="center">Carrinho de Compras</h3> </div> <thead> <tr style="font-size:20px;"> <th>Produto</th> <th>Quantidade</th> <th>Preço</th> <th>Subtotal</th> <th>Ação</th> </tr> </thead> <form method="post"> <tbody> <?php if(count($_SESSION['carrinho']) == 0){ echo ' <tr> <td colspan="5">Não há produto no carrinho</td> </tr> '; } else { require("conecta_carrinho.php"); $total = 0; foreach($_SESSION['carrinho'] as $id => $qtd){ $Conexao = mysqli_connect("localhost","root","","comanda_eletronica"); $sql = "SELECT * FROM produtos WHERE id= '$id'"; $query = mysqli_query($Conexao, $sql); $ln = mysqli_fetch_assoc($query); $nome = $ln['nome']; $preco = number_format($ln['preco'], 2, ',', '.'); $sub = number_format($ln['preco'] * $qtd, 2, ',', '.'); $total += $ln['preco'] * $qtd; echo ' <tr> <td style="font-size:17px;">'.$nome.'</td> <td style="font-size:15px;"><input type="text" size="1" name="prod['.$id.']" value="'.$qtd.'" /></td> <td style="font-size:17px;">R$ '.$preco.'</td> <td style="font-size:17px;">R$ '.$sub.'</td> <td><a href="?acao=del&id='.$id.'"" class="btn btn-danger">Remover</a></td> </tr>'; if($_GET['acao'] == 'add'){ $ValorTotal = $preco * $qtd; $InserirVenda = "insert into venda (ValorTotal) values ('$ValorTotal')"; $query = mysqli_query($Conexao,$InserirVenda); foreach($_SESSION['carrinho'] as $ProdInsert => $qtd): $InserirItens = "Insert into itensvenda(idProduto, NomeProduto, Quantidade) VALUES ('$ProdInsert', '$nome', '$qtd')"; $salvar = mysqli_query($Conexao,$InserirItens); endforeach; } } $total = number_format($total, 2, ',', '.'); echo '<tr> <td colspan="3" class="text-right" style="font-size:20px;"><b>Total:</b></td> <td style="font-size:20px;">R$ '.$total.'</td> <td></td> </tr>'; } ?> </tbody> </form> </div> </table> </div> </body> </html>
  2. Joao emilioborges
    <?php session_start(); if(!isset($_SESSION['carrinho'])){ $_SESSION['carrinho'] = array(); } //adiciona produto if(isset($_GET['acao'])){ //ADICIONAR CARRINHO if($_GET['acao'] == 'add'){ $id = intval($_GET['id']); if(!isset($_SESSION['carrinho'][$id])){ $_SESSION['carrinho'][$id] = 1; } else { $_SESSION['carrinho'][$id] += 1; } } //REMOVER CARRINHO if($_GET['acao'] == 'del'){ $id = intval($_GET['id']); if(isset($_SESSION['carrinho'][$id])){ unset($_SESSION['carrinho'][$id]); } } //ALTERAR QUANTIDADE if($_GET['acao'] == 'up'){ if(is_array($_POST['prod'])){ foreach($_POST['prod'] as $id => $qtd){ $id = intval($id); $qtd = intval($qtd); if(!empty($qtd) || $qtd <> 0){ $_SESSION['carrinho'][$id] = $qtd; }else{ unset($_SESSION['carrinho'][$id]); } } } } } ?> sera que tem jeito?
  3. Joao emilioborges
    So mais uma duvida ..como faço pra ao mesmo tempo q mandar pro carrinho mandar pro banco?um link pode ter mais de um paramentro ? adicionado 4 minutos depois <p><a href="carrinho.php?acao=add&id=<?php echo $product['id']?>" class="btn btn-primary" role="button">Comprar</a> </p>
  4. Joao emilioborges
    Na verdade Dif meu sistema eh de cardapio Digital para restaurantes.etc.. então eu preciso que a cada pedido que o cliente fizer nas mesas caia no banco ..porque esses itens vão ser exibidos tanto no BAR quanto na COZINHA E assim os funcionarios preparam e entregam o pedido ..você me entende?
  5. Joao emilioborges
    Alguem
  6. Joao emilioborges
    Galera tenho mais uma dúvida ..gostaria da ajuda de vcs Estou Enviando esses produtos ao carrinho mais queria enviar esses produtos ao mesmo tempo ao carrinho e ao Banco de Dados ..tem como ?
  7. Joao emilioborges
    Deu certo aqui ..no botao que finaliza o pedido coloquei o target="_top" e encerrou meu projeto direitinho ..obrigado pela compreensao
  8. Joao emilioborges
    <?php require_once "Funcoes/product.php"; $pdoConnection = require_once "conecta_carrinho.php"; $products = getProducts($pdoConnection); ?> <!DOCTYPE html> <html lang="pt-br"> <head> <meta charset="utf-8"> <meta http-equiv="X-UA-Compatible" content="IE=edge"> <meta name="viewport" content="width=device-width, initial-scale=1"> <title>Pizzas</title> <link href="Css/bootstrap.min.css" rel="stylesheet"> <style type="text/css"> #content{ overflow:auto; padding:10px; text-align:justify; color:#FFF; } </style> </head> <body> <div id="content" style="width: 730px; height: 430px !important;"> <table width="100%" border="0" cellpadding="0"> <br> <?php foreach($products as $product):?> <?php if ($product['categoria'] == 'Pizzas'):?> <div class="col-sm-6 col-md-4"> <div class="thumbnail"> <div class="caption text-center"> <img src="imagens/<?php echo $product['imagens']; ?>" alt="<?php echo $product['nome']; ?>"> <h3><?php echo $product['nome']?></h3> <h4> R$ <?php echo number_format($product['preco'], 2, ',', '.')?> </h4> <p><a href="carrinho.php?acao=add&id=<?php echo $product['id']?>" class="btn btn-primary" role="button">Comprar</a> </p> </div> </div> </div> <?php endif; ?> <?php endforeach;?> </table> </div> </body> </html> O código do pizza.php
  9. Joao emilioborges
    Galera mais uma duvida !! não estou conseguindo fazer o meu projeto linkar na pagina inicial(index.php) ja criei um botao no Carrinho.php linkando mais devido no meu sistema eu por meus links dentro dessa DIV ..tudo que eu linko fica dentro dela ..alguem pode me ajudar?? Segue abaixo a imagem do Projeto.. <!--buttons--> <div style="width:750px; height:450px; overflow:hidden; margin: 0 auto; position:relative; margin-top:50px;"> <a href="pizza.php" target="main"><div id="btn1" style="float:left"> <p>Pizzas </p> </div> </a> <a href="lanche.php" target="main"><div id="btn2" style="float:left"> <p> Lanches</p> </div> </a> <a href="porcao.php" target="main"><div id="btn3" style="float:left"> <p>Porções </p> </div> </a> <a href="sobremesa.php" target="main"><div id="btn4" style="float:left"> <p> Sobremesas</p> </div> </a> <a href="bebidas.php" target="main"><div id="btn5" style="float:left"> <p> Refrigerantes e Sucos </p> </div> </a> <a href="alcoolicas.php" target="main"><div id="btn6" style="float:left"> <p> Bebidas Alcoólicas</p> </div> </a> <div id="content" style="position:absolute"> <iframe name="main" frameborder=0 height=450 width=750></iframe> </div> </div>
  10. Joao emilioborges
    Deu super certo aqui Dif ..a unica coisa que tive que alterar foi a variavel $conecta por $link prque no meu arquivo de conexao eu usei ela..muito obrigado pelas dicas
  11. Joao emilioborges
    <html lang="pt-br"> <head> <meta charset="utf-8"> <title>Comanda</title> <link rel="stylesheet" href="css/EstiloLogin.css"> </head> </html> <?php require_once 'conecta_login.php'; $Mesa= $_POST['Mesa']; $SenhaMesa = $_POST['SenhaMesa']; $sql = "select Mesa, SenhaMesa from mesas where Mesa = '$Mesa' and SenhaMesa = '$SenhaMesa'"; $query = mysqli_query($link, $sql); $linhas = mysqli_affected_rows($link); if($linhas > 0){ session_start(); $_SESSION['Mesa'] = $Mesa; while($exibirNome = mysqli_fetch_array($query)){ $Mesa = $exibirNome[0]; $SenhaMesa = $exibirNome[1]; } $_SESSION['Mesa'] = $Mesa; header ("Location:sistema.php"); }else{ print "Dados Incorretos!<br>"; print "<a href='index.php'>Voltar</a>"; } ?> Esse é o script para Processar..
  12. Joao emilioborges
    <!DOCTYPE html> <html lang="pt-br"> <head> <meta charset="utf-8"> <title>Login na Comanda</title> <link rel="stylesheet" href="Css/EstiloLogin.css"> </head> <body> <form name="Mesa" method="post" action="processa_login.php"> <div style="width:100%; height:120px; overflow:hidden; margin: 0 auto; background-color:#333; margin-top:0px; border-radius:100px;"> <div style="width:800px; height:90px; margin: 0 auto ;"> <p style="text-align:center; color:#CCC; font-family:'Lucida Sans Unicode'; font-size:40px;">Sistema de Comanda Eletrônica</p> </div> </div> <fieldset><legend >Mesas</legend> <select name="Mesa" style="width:200px; height:35px; font-size:15px; font-family:Lucida Sans Unicode; border:0;" > <label style="color:#f2e915;">Selecione uma Mesa</label> <?php $Conexao = mysqli_connect("localhost","root","","comanda_eletronica"); $Select = "SELECT mesa FROM mesas"; $query = mysqli_query($Conexao, $Select); ?> <?php while($Mesas = mysqli_fetch_row($query)) { ?> <option value="<?php echo $Mesas['Mesa']; ?>"></option> <?php } ?> </select><br><br> <input type="password" name="SenhaMesa" placeholder="Senha" required><br> <div> <input type="submit" style="background-color:#bfdade; width:200px; height:35px; font-size:15px; font-family:Lucida Sans Unicode; border:0; border-radius:50px;" value="Entrar no Sistema"> </div> </fieldset> </form> </body> </html>
  13. Joao emilioborges
    Ok obrigado meu brother vou testa e te falo
  14. Joao emilioborges
    Galera estou quebrando a cabeça ..como faço para Fazer um sistema de login que ao invés de usar o input ..eu queria usa uma "Combobox" buscando o usuario no "Banco de Dados" <!DOCTYPE html> <html lang="pt-br"> <head> <meta charset="utf-8"> <title>Login na Comanda</title> <link rel="stylesheet" href="Css/EstiloLogin.css"> </head> <body> <form method="post" action="processa_login.php"> <div style="width:100%; height:120px; overflow:hidden; margin: 0 auto; background-color:#333; margin-top:0px; border-radius:100px;"> <div style="width:800px; height:90px; margin: 0 auto ;"> <p style="text-align:center; color:#CCC; font-family:'Lucida Sans Unicode'; font-size:40px;">Sistema de Comanda Eletrônica</p> </div> </div> <fieldset><legend >Mesas</legend> <input type="text" name="Mesa" placeholder="Nome da Mesa" required autofocus><br> <input type="password" name="SenhaMesa" placeholder="Senha" required><br> <div> <input type="submit" style="background-color:#bfdade; width:200px; height:35px; font-size:15px; font-family:Lucida Sans Unicode; border:0; border-radius:50px;" value="Entrar no Sistema"> </div> </fieldset> </body> </html> adicionado 2 minutos depois Tipo Issso
  15. Joao emilioborges
    Cara esta meio complexo ..pra você entender vou te manda logo abaixo o arquivo .rar do meu sistema ja junto com o banco e ve ComandaNova.rar
  16. Joao emilioborges
    <?php foreach($products as $product) :?> <div> <div class="col-sm-6 col-md-4"> <div class="thumbnail"> <div class="caption text-center"> <img src="imagens/<?php echo $product['imagens']; ?>" alt="<?php echo $product['nome']; ?>"> <h3><?php echo $product['nome']?></h3> <h4> R$ <?php echo number_format($product['preco'], 2, ',', '.')?> </h4> <p><a href="carrinho.php?acao=add&id=<?php echo $product['id']?>" class="btn btn-primary" role="button">Comprar</a> </p> </div> </div> </div> </div> <?php endforeach;?> adicionado 0 minutos depois Galera Por Favor estou tendo problemas com este código ..essa imagem que mandei abaixo eh do meu sistema e do banco de dados..Meu sistema tem esses 6 botões que linkam em 6 páginas(pizza.php, lanche.php...)e não estou conseguindo exibir em cada página só os produtos respectivos de cada categoria.. Acho que falta uma estrutura de Condiçao nesse código abaixo ..mais não sei como fazer ..se alguem puder me ajudar agradesço.
  17. Joao emilioborges
    a sim entedi !!vou mudar também
  18. Joao emilioborges
    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
  19. Joao emilioborges
    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"
  20. Joao emilioborges
    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
  21. Joao emilioborges
    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??
  22. Joao emilioborges
    Ta legal!!vou ve aqui e te dou retorno
  23. Joao emilioborges
    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!!
  24. Joao emilioborges
    você tinha razao ..antes de comparar as idades eu pus "caracpnum" e deu certo!eu n tinha nem ideia de que fosse isso.
  25. Joao emilioborges
    //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!!!

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...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!