Ir para conteúdo

Pesquisar na Comunidade

Mostrando resultados para as tags ''Visualg''.

  • Pesquisar por Tags

    Digite tags separadas por vírgulas
  • Pesquisar por Autor

Tipo de Conteúdo


Calendários

  • Comunidade iMasters

Todas as áreas do Fórum

  • Q&A Desenvolvimento
    • Perguntas e respostas rápidas
  • Desenvolvimento Web
    • Desenvolvimento frontend
    • Javascript
    • PHP
    • Ruby
    • Python
    • Java
    • .NET
    • Docker, Kubernets e outros ambientes
    • Desenvolvimento com Wordpress
    • Desenvolvimento de apps
    • Desenvolvimento ágil
    • Desenvolvimento de Games
    • Banco de Dados
    • Design e UX
    • Algoritmos & Outras Tecnologias
  • Entretenimento e uso pessoal
    • Segurança & Malwares
    • Geral
    • Boteco iMasters

Encontrar resultados em...

Encontrar resultados que...


Data de Criação

  • Início

    FIM


Data de Atualização

  • Início

    FIM


Filtrar pelo número de...

Data de Registro

  • Início

    FIM


Grupo


Google+


Hangouts


Skype


Twitter


deviantART


Github


Flickr


LinkedIn


Pinterest


Facebook


Site Pessoal


Localização


Interesses

Encontrado 36 registros

  1. Bom pessoal, estou desenvolvendo um programa em VisualG para uma atividade da Faculdade, que apresente um menu de opções e que permita ao usuário escolher a opção desejada, receba os dados necessários para executar a operação e mostre o resultado. Verificar a possibilidade de opção inválida e não se preocupar com as restrições, como salário inválido. Porém ao executar o mesmo apresenta o erro de "Esperava encontrar entao" e "fimse". algoritmo "semnome" var op: caracter sal, nsal,: real meses: inteiro inicio // Seção de Comandos escreva ("Informe o salário R$: ") leia (sal) limpatela escreval(" MENU ") escreval("1. Novo salário") escreval("2. Férias ") escreval("3. Décimo Terceiro") escreval("4. Sair ") escreval(" ") escreva ("Informe a operação: ") leia (op) limpatela escolha op enquanto op <> 4 faca caso "1" escreva ("O salário do funcionário é R$:", sal, "reais.") se sal <= 350 entao escreva ("O novo salário será R$: ", sal*0.15, "reais") fimse se sal = 350 e <= 600 entao escreva ("O novo salário será R$: ", sal*0.10, "reais") fimse se sal > 600 entao escreva ("O novo salário será R$: ", sal*0.05, "reais") fimse caso "2" escreva ("O salário acrescido de férias será R$ :" (sal+(sal*0.3))) caso "3" escreva ("Informe os meses trabalhados") leia (meses) escreva ("O seu décimo terceiro será RS: " (sal+(sal*meses)/12)) caso "4" escreva ("Encerrar execução") outrocaso ("Opção inexistente") fimescolha fimenquanto fimalgoritmo
  2. Ao sair de um procedimento e entrar em outro, ta apresentando erro quando tento finalizar o programa. Var // Seção de Declarações das variáveis nome: vetor [1..3] de caractere telef: vetor [1..3] de caractere ema: vetor [1..3] de caractere codigo,codigo_contato,codigo_contato_cheio, menu_apagar,opc, opc1: inteiro cont, menu_mostrar,op: inteiro procedimento principal() Inicio // Seção de Comandos, procedimento, funções, operadores, etc... repita escreval ("") escreval ("=== AGENDA TELEFÔNICA ===") escreval ("") escreval ("1. Inserir novo contato") escreval ("2. Apagar contato") escreval ("3. Mostrar todos os contatos") escreval ("4. Sair") escreva ("Digite opcao: ") leia (codigo) limpatela ate (codigo=1) ou (codigo=2) ou (codigo=3) ou (codigo=4) escolha (codigo) caso 1 contato() caso 2 apagar() caso 3 mostrar() caso 4 interrompa fimescolha fimprocedimento //---------------------- NOVO CONTATO ---------------------- procedimento contato() inicio para cont de 1 ate 3 faca limpatela escreval("== INSERIR NOVO CONTATO ==") escreva ("Nome: ") leia (nome[cont]) escreva ("Telefone: ") leia (telef[cont]) escreva ("E-mail: ") leia (ema[cont]) escreval("") escreval("Usuario cadrastrado com sucesso") repita escreval("") escreval("1.Insira novo contato") escreval("2.Voltar ao menu") escreval("") escreva("Digite opção: ") leia(codigo_contato) escolha (codigo_contato) caso 1 escreva("") caso 2 interrompa limpatela principal() outrocaso escreval("") escreval("Opção invalida") escreval("") escreval("Pressione ENTER para voltar") leia(op) limpatela fimescolha ate codigo_contato = 1 fimpara limpatela escreval("") escreval("Lista de contato cheia") repita escreval("") escreval("1.Voltar ao menu") escreval("2.Sair") escreval("") escreval("Digite opção") leia(codigo_contato_cheio) escolha (codigo_contato_cheio) caso 1 limpatela principal() caso 2 interrompa outrocaso escreval("") escreval("Opção invalida") escreval("") escreval("Pressione ENTER para voltar") leia(op) limpatela fimescolha ate codigo_contato_cheio = 1 fimprocedimento //------------------------ Apagar contato------------------------------------ procedimento apagar() inicio limpatela escreval("== APAGAR CONTATO ==") Escreval("") escreva ("Qual contato você quer apagar? ") Escreval("") para cont de 1 ate 3 faca Escreval(cont,". ",nome[cont]) fimpara Escreval("") Escreva("Digite opção:") Leia(opc) se opc >0 entao se opc <4 entao nome[opc]<-"" telef[opc]<-"" ema[opc]<-"" Escreval("") Escreval("Contato Apagado com sucesso") repita escreval("") escreval("1.Apagar outro contato") escreval("2.Voltar ao menu") escreval("3.Sair") escreva("Digite opção:") leia(menu_apagar) Escolha(menu_apagar) caso 1 limpatela apagar() caso 2 limpatela principal() caso3 interrompa outrocaso escreval("") escreval("Opção invalida") escreval("") escreval("Pressione ENTER para voltar") leia(op) senao apagar() fimse fimse fimse fimescolha ate menu_apagar = 3 fimprocedimento //-------------------------- Mostrar todos os contatos --------------------- procedimento mostrar() inicio limpatela escreval("== LISTA DE CONTATOS ==") Escreval("") para cont de 1 ate 3 faca Escreval(cont,". ",nome[cont]) fimpara Escreval("") Escreva("Digite opção:") Leia(opc1) se opc1 >0 entao se opc1 <4 entao limpatela Escreval("Nome: ",nome[opc1]) Escreval("Telefone: ",telef[opc1]) Escreval("E-mail: ",ema[opc1]) repita escreval("") escreval("1.Mostrar outro contato") escreval("2.Voltar ao menu") escreval("") escreva("Digite opção:") Leia(menu_mostrar) Escolha(menu_mostrar) caso 1 limpatela mostrar() caso 2 limpatela principal() outrocaso escreval("") escreval("Opção invalida") escreval("") escreval("Pressione ENTER para voltar") leia(op) senao mostrar() fimse fimse fimescolha limpatela ate menu_mostrar = 1 fimprocedimento inicio // Seção de Comandos principal() Fimalgoritmo
  3. Boa noite,estou tentando executar um algoritmo no visualg que leia 100 números,descubra se existe números primos,se sim mostrar em que posição se encontra. Entretanto,o programa só está executando até onde mostra o vetor. Gostaria de ajuda de como terminar e realizar a verificação do número primo. Var num, cont, divisor: inteiro VET: vetor[0..99] de inteiro Inicio escreval ("Olá!Você quer saber se existe número primo? ") Para num <- 0 ate 99 faca Escreva("Digite o ", num, "o. valor: ") Leia(VET[num]) FimPara LimpaTela escreva ("Vetor: ") para num <- 0 ate 99 faca escreva (VET[num]) fimpara escreval ("") cont <- 0 divisor <- 1 Para num <- 0 ate 99 faca cont <- cont + 1 divisor <- divisor + 1 se (divisor <= num)e(num mod divisor = 0)e (cont = 2) entao EscrevaL("Valor", VET[num], " na posicao [",num, "] é Primo!") fimse fimpara Fimalgoritmo
  4. Boa noite,estou tentando fazer um algoritmo que leia 50 números e mostre em ordem crescente e decrescente ao usuário,preciso utilizar vetor. Até agora só conseguir fazer a parte crescente. Alguém tem alguma dica de como fazer a parte decrescente? Var CONTADORA, CONTADORB: inteiro NUM, AUX: inteiro VET: vetor[0..49] de inteiro Inicio para CONTADORA de 0 ate 49 faca escreval ("Digite um número") leia (NUM) VET[CONTADORA] <- NUM fimpara para CONTADORA de 0 ate 48 faca para CONTADORB de CONTADORA + 1 ate 49 faca se VET[CONTADORA] > VET[CONTADORB] entao AUX <-VET[CONTADORB] VET[CONTADORB] <- VET[CONTADORA] VET[CONTADORA] <- AUX fimse fimpara fimpara escreval("A ordem crescente dos números é: ") para CONTADORA de 0 ate 49 faca escreva(VET[CONTADORA]) fimpara Fimalgoritmo
  5. flavionorvel

    Converter linguagem C para visualg

    #include <stdio.h> #include <stdlib.h> // Limites de tamanhos #define MINIMO 2 #define MAXIMO 50 // Variáveis globais int opcao = 0; int linhas = MAXIMO; int colunas = MAXIMO; int matrizA[MAXIMO][MAXIMO]; int matrizB[MAXIMO][MAXIMO]; void limpar_tela(); // Retorna resposta do usuario se quer rodar novamente int rodar_novamente() { int opcao = 0; printf("\n\nDeseja rodar novamente? Digite 1 para SIM e 0 para Não: "); scanf("%d",&opcao); if (opcao == 1 || opcao == 0) { return opcao; } printf("\nOpcao invalida. Escolha novamente."); return rodar_novamente(); } // Recebe valor inteiro do usuario int receber_numero() { int numero = 0; scanf("%d",&numero); if (numero >0) { return numero; } printf("\nNúmero inválido. digite um número positivo.: "); return receber_numero(); } // Valida tamanhos de linhas e colunas int validar_tamanhos(int linhas, int colunas) { if ((linhas >= MINIMO && linhas <= MAXIMO) && (colunas >= MINIMO && colunas <= MAXIMO) && (linhas ! = colunas)) { return 1; } printf("\nLinhas e Colunas devem ser diferentes e ter valores entre %d e %d. Tente novamente.",MINIMO,MAXIMO); return 0; } // Preencher matriz void preencher_matriz(int matriz[MAXIMO][MAXIMO], int linhas, int colunas) { int i,j; for (i = 0 ; i < linhas ; i ++) { for (j = 0 ; j < colunas ; j ++) { printf("\nDigite um valor inteiro para a posicao %d-%d da matriz A: ",i,j); matriz[j] = receber_numero(); } } } // Imprimir matrizes void imprimir_matrizes(int matrizA[MAXIMO][MAXIMO], int matrizB[MAXIMO][MAXIMO], int linhas, int colunas) { int i,j; limpar_tela(); printf("\n\nMATRIZ A\n"); for (i = 0 ; i < linhas ; i++) { for (j = 0 ; j < colunas ; j ++) { printf("\nMATRIZ A POSICAO %d-%d: %d",i,j,matrizA[j]); } } printf("\n\nMATRIZ B (TRANSPOSTA DE A)\n"); for (i = 0 ; i < colunas ; i++) { for (j = 0 ; j < linhas ; j ++) { printf("\nMATRIZ B POSICAO %d-%d: %d",i,j,matrizB[j]); } } } void limpar_tela() { system("@cls||clear"); } // Laço principal int main() { int i,j; do { //Inicializar variáveis opcao = 0; linhas = 0; colunas = 0; i = 0; j = 0; do { printf("\nEntre com o tamanho para linhas: "); linhas = receber_numero(); printf("\nEntre com o tamanho para colunas: "); colunas = receber_numero(); } while (!validar_tamanhos(linhas,colunas)); // entrar com valores para a matriz A preencher_matriz(matrizA, linhas, colunas); // criar matriz transposta de A for(i = 0 ; i < linhas ; i ++) { for(j = 0 ; j < colunas ;j ++) { matrizB[j] = matrizA[j]; } } // Imprimir matrizes imprimir_matrizes(matrizA,matrizB,linhas, colunas); // Pergunta ao usuário se quer continuar opcao = rodar_novamente(); } while (opcao == 1); }me
  6. Fernando Cavaccini

    Dividir área em partes iguais

    Boa noite pessoal, estou criando um algoritmo no Visualg, que é para um usuário que está construindo uma casa, porém em uma parte, é necessário dividir a área interna da casa em partes iguais, mas não sei como posso fazer isso, se alguém pudesse dar uma dica. Obrigado desde já.
  7. Olá, sou nova na programação e ainda estou trabalhando só com o visualg. Então relevem qualquer coisa, por favor. Bom... Meu professor pediu para fazermos um programa no visualg que escrevesse de 0 até 100 por extenso. Tem algumas restrições só podemos usar: Se; fimse; Escreva; leia; <- •Não pode usar vetores e isso complicou muito. •Não pode ser (todo) assim: se (numero=45) enato escreva("Quarenta e cinco"), porque isso ia gastar muitas linhas. Ele deu uma dica de como fazer: Var: Unidaden: inteiro Unidadec: caractere Dezena: caractere Numero: inteiro Inicio: escreva ("Digite um número e tecle enter: ) leia (numero) Se (numero>20) e (numero<30) entao escreva ("Vinte e ", ???)
  8. Olá, gostaria que vocês pudessem me ajudar a desenvolver e com resolução esses exercícios aqui, estou quebrando a cabeça e não consigo chegar em nadaaa, obrigado!!! Primeiro exercício 1-Leia um valor inteiro entre 1000 e 9999 e verifique se o número formado apenas pelos algarismos que estão nas casas das unidades de milhar e das centenas é ou não múltiplo de 4. Segundo " " 2- Numa loja de eletrodomésticos, o vendedor encarregado da seção de televisores recebe, mensalmente, um salário fixo mais comissão. Esta comissão é calculada em relação ao tipo e a quantidade de televisores vendidos por mês, obedecendo a seguinte tabela: Sobre o seu salário fixo há um desconto de 10% referente ao INSS. Caso o seu salário bruto exceda a R$ 1500,00 haverá desconto de imposto de renda, conforme a segunda a tabela ao lado, aplicada sobre o valor excedente a R$ 1500,00. Calcule: a comissão do funcionário, o salário bruto, os valores de cada desconto, o total dos descontos e o salário líquido. Terceiro " " Escreva um algoritmo que leia o valor de 3 ângulos de um triângulo e escreva se o triângulo é retângulo, obtusângulo ou acutângulo. A saber, o triângulo retângulo possui um ângulo reto, o triângulo obtusângulo possui um ângulo obtuso, e o triângulo acutângulo possui 3 ângulos agudos. Quarto No Campeonato Mundial de Cross Fit o atleta deve pesar entre 65 Kg (inclusive) e 100 Kg (inclusive) e medir de 1,70 m (inclusive) a 1,95 m (inclusive). Escrever um algoritmo para ler a altura e o peso de um jogador e determinar se o jogador está apto a participar do campeonato, escrevendo a mensagem correta, conforme a situação: • ACEITO (se a altura e o peso do jogador estiverem dentro da faixa especificada) • TOTALMENTE RECUSADO (se a altura e o peso do jogador forem inválidos) • RECUSADO POR ALTURA (se somente a altura do jogador for inválida) • RECUSADO POR PESO (se somente o peso do jogador for inválido)
  9. Gente alguém pode me da uma luz nesse algoritmo? como eu resolvo isso pelo menos? Tentei utilizar o comando arquivo <> no visualg, mas não da certo. Você decidiu comprar um carro e para ajudar na sua decisão, você resolveu desenvolver um código que mostre ao final qual é o menor custo ao final de ano para cada modelo escolhido baseado no custo total de compra do carro, custo com impostos, custo com combustível (considerando o consumo médio de cada veículo e um total estimado de 10.000 Km rodados no ano e o valor de médio R$ 3,98 para o litro de combustível) e custos com seguro. Como dados de entrada você pode criar um arquivo que contenha as seguintes informações que serão carregadas no programa. Modelo do veículo Custo total de compra Custo total de impostos Consumo médio de combustível (Km/l) Custos com seguro Chevrolet Ônix R$36.000,00 R$1.400,00 11,8 R$1.600,00 Ford Fiesta R$32.000,00 R$1.300,00 13,5 R$1.800,00 VW Fox R$31.000,00 R$1.450,00 12,3 R$1.300,00 VW Polo R$41.000,00 R$1.600,00 13,5 R$1.500,00 Hyundai HB20 R$40.000,00 R$1.200,00 11,6 R$1.200,00 Renault Sandero R$30.000,00 R$1.300,00 12,8 R$1.900,00 Ao final o programa deverá mostrar os dados apresentados na tabela para cada veículo e o custo total no final de um ano para cada um deles.
  10. dillan

    Visualg

    Peguei este algoritmo em um livro mas quando faço no visualg sempre dar erro onde está o problema: Algoritmo "semnome" // // // Descrição : Aqui você descreve o que o programa faz! (função) // Autor(a) : Nome do(a) aluno(a) // Data atual : 09/05/2017 Var mes:inteiro Inicio leia (mes) caso mes seja 1 faca escreva("Janeiro") seja 2 faca escreva("Fevereiro") seja 3 faca escreva("Março") seja 4 faca escreva("Abril") seja 5 faca escreva("Maio") seja 6 faca escreva("Junho") seja 7 faca escreva("Julho") seja 8 faca escreva("Agosto") seja 9 faca escreva("Setembro") seja 10 faca escreva("Outubro") seja 11 faca escreva("Novembro") seja 12 faca escreva("Dezembro") senao escreva("Valor Invalido") fim_caso Fimalgoritmo
  11. rafatrinity

    Merge Sort

    como fazer merge sort de forma não recursiva e/ou sem passar vetor como parametro
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.