VisualG – 40 Exercícios para Treinar e Aprender

Prévia do material em texto

10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 1/18
Este é um trabalho totalmente gratuito com o propósito de servir, motivar e colaborar com
quem deseja aprender e utilizar os assuntos aqui apresentados, para a vida. Temos pessoas
trabalhando no desenvolvimento de postagens, vídeos, presença no site para tirar dúvidas,
enfim, coisas que talvez possam atender alguma forma de expectativa. Por isto, se algumas
das postagens, vídeos ou qualquer coisa compartilhada aqui tenha lhe servido, considere fazer
uma pequena doação, clicando em DOAR. Desta maneira, estará ajudando a dar continuidade
a todo este trabalho. Agradecemos.
VisualG – Exercícios para Treinar e
Aprender
agosto 9, 2014 Exercícios VisualG Algoritmos, Exercícios
Conteúdo [Esconder]
1 Exercícios de VisuAlG para Aprender Lógica
2 Lista
2.1 Exercício 1
2.2 Exercício 2
2.3 Exercício 3
2.4 Exercício 4
2.5 Exercício 5
2.6 Exercício 6
2.7 Exercício 7
2.8 Exercício 8
2.9 Exercício 9
2.10 Exercício 10
2.11 Exercício 11
2.12 Exercício 12
2.13 Exercício 13
2.14 Exercício 14
2.15 Exercício 15
2.16 Exercício 16
2.17 Exercício 17
2.18 Exercício 18
2.19 Exercício 19
2.20 Exercício 20
2.21 Exercício 21
2.22 Exercício 22
2.23 Exercício 23
2.24 Exercício 24
2.25 Exercício 25
2.26 Exercício 26
2.27 Exercício 27
2.28 Exercício 28
2.29 Exercício 29
2.30 Exercício 31
2.31 Exercício 32
2.32 Exercício 33
2.33 Exercício 34
2.34 Exercício 35
2.35 Exercício 36

10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 2/18
2.36 Exercício 38
2.37 Exercício 39
3 Referências
 
Exercícios de VisuAlG para Aprender Lógica
[wikibox lang = “pt”]Visualg[/wikibox]
Lista
Esta lista foi disponibilizada por Flaviano O. Silva, e as respostas dos exercícios, por Bruno Barbosa,
no formato .alg que podem ser abertos, estudados e testados no VisualG. É uma excelente
oportunidade para que você entenda como programar. A lista completa para você baixar pode ser
vista clicando sobre os links nos nomes dos autores ou em Documents VisualG
Exercício 1
Exercício 2
Veja no Wikipédia
Faça um algoritmo que receba dois números e exiba o resultado da sua soma.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
algoritmo "ex1"
// Função : Faça um algoritmo que receba dois números e exiba o resultado da sua soma.
// Autor :
// Data : 30/11/2010
// Seção de Declarações 
var
x, y: inteiro
 
inicio
// Seção de Comandos 
escreval("Digite o primeiro número: ")
leia(x)
escreval("Digite o segundo número: ")
leia(y)
escreva("A soma dos números é: ",x+y)
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
algoritmo "ex2"
// Função : Faça um algoritmo que receba dois números e ao final mostre a 
// soma, subtração, multiplicação e a divisão dos números lidos.
// Autor :
// Data : 30/11/2010
// Seção de Declarações 
var
x, y: real
 
inicio
// Seção de Comandos 
escreva("Digite o primeiro número: ")
leia(x)
escreva("Digite o segundo número: ")
leia(y)
escreval("A soma é: ",x+y)
escreval("A subtração é: ",x-y)
escreval("A multiplicação é: ",x*y)
escreval("A divisão é: ",x/y)
 
fimalgoritmo
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 3/18
Exercício 3
Exercício 4
Exercício 5
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
algoritmo "ex3"
// Função : Escrever um algoritmo para determinar o consumo médio de um 
// automóvel sendo fornecida a distância total percorrida pelo automóvel e 
// o total de combustível gasto.
// Autor :
// Data : 30/11/2010
// Seção de Declarações 
var
distancia, combustivel: real
 
inicio
// Seção de Comandos
escreval("========== Cálculo de consumo médio de combustível ========="
escreva("Digite a distância pecorrida: ")
leia(distancia)
escreva("Digite o combustível gasto: ")
leia(combustivel)
escreval("O consumo médio de combustível do seu veículo é: ",distancia
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
algoritmo "ex4"
// Função : Escrever um algoritmo que leia o nome de um vendedor, o seu 
// salário fixo e o total de vendas efetuadas por ele no
// mês (em dinheiro). Sabendo que este vendedor ganha 15% de comissão sobre 
// suas vendas efetuadas, informar o
// seu nome, o salário fixo e salário no final do mês
// Autor :
// Data : 30/11/2010
// Seção de Declarações 
var
nome: caractere
salario: real
vendas: real
comissao: real
salarioFinal: real
 
inicio
// Seção de Comandos 
escreval("<><><><><> Sistema de gestão de vendedores <><><><><>")
escreva(">>> Digite o nome do vendedor: ")
leia(nome)
escreva(">>> Digite o salário: ")
leia(salario)
escreva(">>> Informe a quantidade de vendas deste no mês: ")
leia(vendas)
// Cálculo da comissão e salário final
comissao >>>>>>>>> RESUMO <<<<<<<<<<")
escreval("-- Nome: ",nome)
escreval("-- Salário: ",salario)
escreval("-- Salário Final (salário + comissão): ",salarioFinal)
escreval(">>>>>>>>>><><><><><<<<<<<<<<")
 
 
 
fimalgoritmo
1
2
3
4
5
6
7
8
algoritmo "ex5"
// Função : Escrever um algoritmo que leia o nome de um aluno e as notas 
// das três provas que ele obteve no semestre. No final
// informar o nome do aluno e a sua média (aritmética)
// Autor :
// Data : 30/11/2010
// Seção de Declarações 
var
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 4/18
Exercício 6
Exercício 7
Exercício 8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
aluno: caractere
notas: vetor[1..3] de real
x: inteiro
media: real
 
inicio
// Seção de Comandos
escreval("============== Média de alunos ==============")
escreva("Digite o nome do aluno: ")
leia(aluno)
para x de 1 ate 3 faca
     escreva("Digite a ",x,"º nota ")
     leia(notas[x])
fimpara
media >> Média: ",media)
escreval("=======================================")
 
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
algoritmo "ex6"
// Função : Ler dois valores para as variáveis A e B, e efetuar as trocas 
// dos valores de forma que a variável A passe a possuir o
// valor da variável B e a variável B passe a possuir o valor da variável 
// A. Apresentar os valores trocados.
// Autor :
// Data : 30/11/2010
// Seção de Declarações 
var
a, b, troca: inteiro
 
inicio
// Seção de Comandos
escreva("Digite o valor(numérico) da variável A: ")
leia(a)
escreva("Digite o valor(numérico) da variável B: ")
leia(b)
troca
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
algoritmo "ex7"
// Função : Ler uma temperatura em graus Celsius e apresentá-la convertida
// em graus Fahrenheit. A fórmula de conversão é:
// F=(9*C+160) / 5, sendo F a temperatura em Fahrenheit e C a temperatura em Celsius.
// Autor :
// Data : 30/11/2010
// Seção de Declarações 
var
cel, far: real
 
inicio
// Seção de Comandos
escreval("=-=-=-=-=- Tabela de conversão: Celcius -> Fahrenheit -=-=-=-=-="
escreva("Digite a temperatura em Celcius: ")
leia(cel)
far
1
2
3
4
5
6
7
8
9
10
algoritmo "ex8"
// Função : Elaborar um algoritmo que efetue a apresentação do valor da 
// conversão em real (R$) de um valor lido em dólar
// (US$). O algoritmo deverá solicitar o valor da cotação do dólar e também
// a quantidade de dólares disponíveis com o usuário.
// Autor :
// Data : 30/11/2010
// Seção de Declarações 
var
rs, us, cotacao, dolaDisponivel:real
Seja o primeiro de seus amigos a curtir isso.
Partilho
2.086 curtidas
Curtir Página
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 5/18
Exercício 9
Exercício 10
Exercício 11
Exercício 12
11
12
13
14
15
16
17
18
19
 
inicio
// Seção de Comandos
escreval("========= Cotação do Dólar ==========")
escreva("Qual a cotação atual do dólar? ")
leia(cotacao)
escreva("Quantos dólares você possui? ")
leia(us)
rs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
algoritmo "ex9"
// Função : Faça um algoritmo que receba um valor que foi depositado e 
// exiba o valor com rendimento após um mês.
// Considere fixo o juro da poupança em 0,70% a. m.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
correcao, deposito: real
 
 
inicio
// Seção de Comandos
escreval("Sistema de depósito do Banco do Oeste")
escreva("Digite o valor depositado: ")
leia(deposito)
correcao
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
algoritmo "ex10"
// Função : A Loja Mamão com Açúcar está vendendo seus produtos em 5
//(cinco) prestações sem juros. Faça um algoritmo que
// receba um valor de uma compra e mostre o valor das prestações.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
compra, prestacao: real
 
inicio
// Seção de Comandos 
escreval("========== Loja Mamão com Açúcar ==========")
escreva("Digite o valor da compra: ")
leia(compra)
prestacao
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
algoritmo "ex11"
// Função : Faça um algoritmo que receba o preço de custo de um produto e 
// mostre o valor de venda. Sabe-se que o preço de
// custo receberá um acréscimo de acordo com um percentual informado pelo usuário.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
custo, venda, percent: real
 
inicio
// Seção de Comandos
escreva("Digite o custo do produto: ")
leia(custo)
escreva("Digite o percentual para venda: ")
leia(percent)
percent
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 6/18
Exercício 13
Exercício 14
Exercício 15
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
algoritmo "ex12"
// Função : O custo ao consumidor de um carro novo é a soma do custo de 
// fábrica com a percentagem do distribuidor e dos
// impostos (aplicados, primeiro os impostos sobre o custo de fábrica, e 
// depois a percentagem do distribuidor sobre o
// resultado). Supondo que a percentagem do distribuidor seja de 28% e os 
// impostos 45%. Escrever um algoritmo que
// leia o custo de fábrica de um carro e informe o custo ao consumidor do mesmo.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
custoFabrica, custoFinal: real
 
inicio
// Seção de Comandos
 
escreva("Informe o custo de fábrica do veículo: ")
leia(custoFabrica)
custoFinal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
algoritmo "ex13"
// Função : Faça um algoritmo que receba um número e mostre uma mensagem 
// caso este número seja maior que 10.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
numero: inteiro
 
inicio
// Seção de Comandos
escreva("Digite um número: ")
leia(numero)
se numero > 10 entao
   escreval("O número é maior que 10")
fimse
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
algoritmo "ex14"
// Função : Escrever um algoritmo que leia dois valores inteiro distintos e 
// informe qual é o maior.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
num1, num2: inteiro
 
inicio
// Seção de Comandos
escreva("Digite o primeiro número: ")
leia(num1)
escreva("Digite o segundo número: ")
leia(num2)
 
se num1 > num2 entao
     escreva("O primeiro número ",num1," é maior que o segundo",num2)
senao
     escreva("O segundo número",num2," é maior que o primeiro",num1)
fimse
 
fimalgoritmo
1 algoritmo "ex15"
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 7/18
Exercício 16
Exercício 17
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
// Função : Faça um algoritmo que receba um número e diga se este número 
// está no intervalo entre 100 e 200.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
numero: inteiro
 
inicio
// Seção de Comandos 
escreva("Digite um número: ")
leia(numero)
se numero >= 100 entao
   se numero <= 200 entao
      escreval("O número está no intervalo entre 100 e 200")
   senao
        escreval("O número não está no intervalo entre 100 e 200")
   fimse
senao
   escreval("O número não está no intervalo entre 100 e 200")
fimse
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
algoritmo "ex16"
// Função : Escrever um algoritmo que leia o nome e as três notas obtidas ]
// por um aluno durante o semestre. Calcular a sua
// média (aritmética), informar o nome e sua menção aprovado (media >= 7), // Reprovado (media <= 5) e Recuperação
// (media entre 5.1 a 6.9).
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
nome: caractere
n1, n2, n3, media: real
 
inicio
// Seção de Comandos 
escreval("Sistema de médias")
escreva("Digite a primeira nota: ")
leia(n1)
escreva("Digite a segunda nota: ")
leia(n2)
escreva("Digite a terceria nota: ")
leia(n3)
media = 7 entao
   escreval("Aluno aprovado!")
senao
   se media <= 5 entao
      escreval("Aluno reprovado!")
   senao
      escreval("Aluno em recuperação...")
   fimse
fimse
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
algoritmo "ex17"
// Função : Ler 80 números e ao final informar quantos número(s) est(á)ão 
// no intervalo entre 10 (inclusive) e 150 (inclusive).
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
x, num, intervalo: inteiro
 
inicio
// Seção de Comandos
para x de 1 ate 80 faca
     escreva("Digite um número: ")
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 8/18
Exercício 18
Exercício 19
Exercício 20
14
15
16
17
     leia(num)
     se num >= 10 entao
        se num <= 150 entao
           intervalo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
algoritmo "ex18"
// Função : Faça um algoritmo que receba a idade de 75 pessoas e mostre 
// mensagem informando "maior de idade" e "menor de
// idade" para cada pessoa. Considere a idade a partir de 18 anos como maior de idade.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
x, idade: inteiro
 
inicio
// Seção de Comandos
para x de 1 ate 75 faca
     escreva("Digite a idade: ")
     leia(idade)
     se idade >= 18 entao
        escreval("Fulano é maior de idade!")
     fimse
fimpara
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
algoritmo "ex19"
// Função : Escrever um algoritmo que leia o nome e o sexo de 56 pessoas e 
// informe o nome e se ela é homem ou mulher. No
// final informe total de homens e de mulheres.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
nome, sexo: caractere
x, h, m: inteiro
 
inicio
// Seção de Comandos 
para x de 1 ate 5 faca
     limpatela
     escreva("Digite o nome: ")
     leia(nome)
     escreva("H - Homem ou M - Mulher: ")
     leia(sexo)
     escolha sexo
         caso "H"
              h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
algoritmo "ex20"
// Função : A concessionária de veículosCARANGO VELHO está vendendo os 
// seus veículos com desconto. Faça um
// algoritmo que calcule e exiba o valor do desconto e o valor a ser pago 
// pelo cliente de vários carros. O desconto
// deverá ser calculado de acordo com o ano do veículo. Até 2000 - 12% e 
// acima de 2000 - 7%. O sistema deverá
// perguntar se deseja continuar calculando desconto até que a resposta 
// seja: \u201c(N) Não\u201d . Informar total de carros com
// ano até 2000 e total geral.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
programa, opc: caractere
ano, total, total2000: inteiro
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 9/18
Exercício 21
Exercício 22
Exercício 23
17
18
19
20
21
22
23
24
25
26
27
28
29
valor, valorFinal, desconto: real
 
inicio
// Seção de Comandos 
programa <- "S"
enquanto programa <> "N" faca
    limpatela
    escreva("Digite o valor do carro: ")
    leia(valor)
    escreva("Digite o ano do carro: ")
    leia(ano)
    se ano <= 2000 entao
        desconto
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
algoritmo "ex21"
// Função : Escrever um algoritmo que leia os dados de N pessoas (nome, 
// sexo, idade e saúde) e informe se está apta ou não
// para cumprir o serviço militar obrigatório. Informe os totais.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
programa, idade, apto: inteiro
nome, sexo, saude, opc: caractere
totApto, total: inteiro
inicio
// Seção de Comandos 
programa "B" entao
            apto
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
algoritmo "ex22"
// Função : Faça um algoritmo que receba o preço de custo e o preço de 
// venda de 40 produtos. Mostre como resultado se
// houve lucro, prejuízo ou empate para cada produto. Informe media de 
// preço de custo e do preço de venda.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
x: inteiro
precoVenda, precoCusto: real
mediaCusto, mediaVenda: real
 
inicio
// Seção de Comandos 
para x de 1 ate 40 faca
    limpatela
    escreva("Digite o preço de custo: ")
    leia(precoCusto)
    mediaCusto  precoCusto entao
            escreval("Houve lucro na venda")
        fimse
    fimse
    
fimpara
 
limpatela
escreval("A média de preço de custo foi: ",mediaCusto/40)
escreval("A média de preço de venda foi: ",mediaVenda/40)
 
fimalgoritmo
1
2
3
4
algoritmo "ex23"
// Função : Faça um algoritmo que receba um número e mostre uma mensagem 
// caso este número sege maior que 80, menor
// que 25 ou igual a 40.
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 10/18
Exercício 24
Exercício 25
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
numero: inteiro
 
inicio
// Seção de Comandos 
escreva("Digite um número: ")
leia(numero)
 
se numero > 80 entao
    escreval("O número é maior que 80")
senao
    se numero < 25 entao
        escreval("O número é menor que 25")
    senao
        se numero = 40 entao
            escreval("O número é igual a 40")
        fimse
    fimse
fimse
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
algoritmo "ex24"
// Função : Faça um algoritmo que receba N números e mostre positivo, 
// negativo ou zero para cada número.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
programa, numero: inteiro
opc: caractere
 
inicio
// Seção de Comandos
programa 0 entao
        escreval("Positivo")
    senao
        se numero = 0 entao
            escreval("O número é igual a 0")
        fimse
        se numero < 0 entao
            escreval("Negativo")
        fimse
    fimse
 
 
    escreva("Deseja finalizar? (S/N) ")
    leia(opc)
    se opc = "S" entao
        programa
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
algoritmo "ex25"
// Função : Faça um algoritmo que leia dois números e identifique se são 
// iguais ou diferentes. Caso eles sejam iguais imprima
// uma mensagem dizendo que eles são iguais. Caso sejam diferentes, informe 
// qual número é o maior, e uma
// mensagem que são diferentes.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
num1, num2: inteiro
 
inicio
// Seção de Comandos 
escreva("Digite o primeiro número: ")
leia(num1)
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 11/18
Exercício 26
Exercício 27
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
escreva("Digite o segundo número: ")
leia(num2)
se num1 = num2 entao
    escreval("Os números são iguais!")
senao
    se num1 > num2 entao
        escreval("O número",num1," é maior que o número",num2)
        escreval("Eles são diferentes!!!")
    senao
        escreval("O número",num2," é maior que o número",num1)
        escreval("Eles são diferentes!!!")
    fimse
fimse
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
algoritmo "ex26"
// Função : Faça um algoritmo que leia um número de 1 a 5 e escreva por 
// extenso. Caso o usuário digite um número que não
// esteja neste intervalo, exibir mensagem: número inválido.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
numero: inteiro
inicio
// Seção de Comandos 
escreva("Digite um número de 1 a 5: ")
leia(numero)
escolha numero
caso 1
    escreval("Um")
caso 2
    escreval("Dois")
caso 3
    escreval("Três")
caso 4
    escreval("Quatro")
caso 5
    escreval("Cinco")
outrocaso
    escreval("Número Inválido!!!")
fimescolha
 
fimalgoritmo
algoritmo "ex27"
// Função : A concessionária de veículos CARANGO está vendendo os seus 
// veículos com desconto. Faça um algoritmo que
// calcule e exiba o valor do desconto e o valor a ser pago pelo cliente. O 
// desconto deverá ser calculado sobre o valor
// do veículo de acordo com o combustível (álcool \u2013 25%, gasolina 
// \u2013 21% ou diesel \u201314%). Com valor do veículo zero
// encerra entrada de dados. Informe total de desconto e total pago pelos clientes.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
desconto, valorPago, valorVeiculo: real
totalDesconto, totalPago: real
combustivel, opc: caractere
inicio
// Seção de Comandos
valorVeiculo 0 faca
 limpatela
 escreva("Digite o valor do veículo: ")
 leia(valorVeiculo)
 se valorVeiculo <> 0 entao
 escreval("Digite o combustível")
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 12/18
Exercício 28
Exercício 29
 escreva("(G)asolina / (A)lcool / (D)iesel: ")
 leia(combustivel)
 escolha combustivel
 caso "A"
 desconto
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
algoritmo "ex28"
// Função : Escrever um algoritmo para uma empresa que decide dar um 
// reajuste a seus 584 funcionários de acordo com os
// seguintes critérios:
// a) 50% para aqueles que ganham menos do que três salários mínimos;
// b) 20% para aqueles que ganham entre três até dez salários mínimos;
// c) 15% para aqueles que ganham acima de dez até vinte salários mínimos;
// d) 10% para os demais funcionários.
// Leia o nome do funcionário,seu salário e o valor do salário mínimo. 
// Calcule o seu novo salário reajustado. Escrever o
// nome do funcionário, o reajuste e seu novo salário. Calcule quanto à 
// empresa vai aumentar sua folha de pagamento.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
salarioMinimo, novoSalario, reajuste, reajusteTotal, folha, novaFolha,
nome, opc: caractere
x: inteiro
 
inicio
// Seção de Comandos
opc <- "x"
escreval("<><><><><> Sistema de reajuste salarial <><><><><>")
escreva("Digite o valor atual do salário mínimo: ")
leia(salarioMinimo)
para x de 1 ate 584 faca
    limpatela
    escreva("Digite o nome: ")
    leia(nome)
    escreva("Digite o salário: ")
    leia(salario)
    calc >> Nome: ",nome)
        escreval(">>> Reajuste = 50%: ",reajuste*salario)
        escreval(">>> Novo salário: ",novoSalario)
        escreval(">>> Tecle enter para continuar...")
        leia(opc)
    senao
        calc >> Nome: ",nome)
            escreval(">>> Reajuste = 20%: ",reajuste*salario)
            escreval(">>> Novo salário: ",novoSalario)
            escreval(">>> Tecle enter para continuar...")
            leia(opc)
        senao
            calc >> Nome: ",nome)
                escreval(">>> Reajuste = 15%: ",reajuste*salario)
                escreval(">>> Novo salário: ",novoSalario)
                escreval(">>> Tecle enter para continuar...")
                leia(opc)
            senao
                reajuste >> Nome: ",nome)
                escreval(">>> Reajuste = 10%: ",reajuste*salario)
                escreval(">>> Novo salário: ",novoSalario)
                escreval(">>> Tecle enter para continuar...")
                leia(opc)
            fimse
        fimse
    fimse
fimpara
escreval("")
escreval("A empresa aumentou a folha de pagamento em:",novaFolha - folha
 
fimalgoritmo
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 13/18
Exercício 31
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
algoritmo "ex29"
// Função : Faça um algoritmo que receba o número do mês e mostre o mês 
// correspondente. Valide mês inválido
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
mes: inteiro
 
inicio
// Seção de Comandos 
escreval("Digite o número do mês: ")
leia(mes)
escolha mes
caso 1
    escreval("Janeiro")
caso 2
    escreval("Fevereiro")
caso 3
    escreval("Março")
caso 4
    escreval("Abril")
caso 5
    escreval("Maio")
caso 6
    escreval("Junho")
caso 7
    escreval("Julho")
caso 8
    escreval("Agosto")
caso 9
    escreval("Setembro")
caso 10
    escreval("Outubro")
caso 11
    escreval("Novembro")
caso 12
    escreval("Dezembro")
outrocaso
    escreval("Mês inválido!")
fimescolha
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
algoritmo "ex31"
// Função : Escrever um algoritmo que leia três valores inteiros distintos 
// e os escreva em ordem crescente
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
num1, num2, num3: inteiro
ordena: vetor[1..3] de inteiro
 
inicio
// Seção de Comandos
escreva("Digite o primeiro número: ")
leia(num1)
escreva("Digite o segundo número: ")
leia(num2)
escreva("Digite o terceiro número: ")
leia(num3)
 
se num1 > num2 entao
    ordena[3]  num1 entao
        ordena[3]  num2 entao
            ordena[3]  num2 entao
        ordena[3]  num1 entao
            ordena[3] ",ordena[1])
escreval(">",ordena[2])
escreval(">",ordena[3])
fimalgoritmo
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 14/18
Exercício 32
Exercício 33
Exercício 34
algoritmo "ex32"
// Função : Dados três valores A, B e C, em que A e B são números reais e C 
// é um caractere, pede-se para imprimir o resultado
// da operação de A por B se C for um símbolo de operador aritmético; caso 
// contrário deve ser impressa uma
// mensagem de operador não definido. Tratar erro de divisão por zero.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
A, B: real
C: caractere
inicio
// Seção de Comandos
escreva("Digite o primeiro número: ")
leia(A)
escreva("Digite o segundo número: ")
leia(B)
escreva("Digite a operação desejada (+ - / *): ")
leia(C)
escolha C
 caso "+"
 escreval("A+B =",A+B)
 caso "-"
 escreval("A-B =",A-B)
 caso "*" =
 escreval("A*B =",A*B)
 caso "/"
 se B = 0 entao
 escreval("Erro, um número não pode ser dividido por 0!")
 senao
 escreval("A/B =",A/B)
 fimse
 outrocaso
 escreval("Operador não definido!")
fimescolha
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
algoritmo "ex33"
// Função : Escrever um algoritmo que leia três valores inteiros e 
// verifique se eles podem ser os lados de um triângulo. Se
// forem, informar qual o tipo de triângulo que eles formam: equilátero, 
// isóscele ou escaleno
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
la, lb, lc, triangulo: inteiro
inicio
// Seção de Comandos 
escreva("Digite o lado A do triângulo: ")
leia(la)
escreva("Digite o lado B do triângulo: ")
leia(lb)
escreva("Digite o lado C do triângulo: ")
leia(lc)
 
se la < (lc+lb) entao
    triangulo
1
2
3
4
5
6
algoritmo "ex34"
// Função : A escola \u201cAPRENDER\u201d faz o pagamento de seus 
// professores por hora/aula. Faça um algoritmo que calcule e exiba o
// salário de um professor. Sabe-se que o valor da hora/aula segue a tabela abaixo:
// Professor Nível 1 R$12,00 por hora/aula
// Professor Nível 2 R$17,00 por hora/aula
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 15/18
Exercício 35
Exercício 36
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
// Professor Nível 3 R$25,00 por hora/aula
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
nivel, horas: inteiro
inicio
// Seção de Comandos
escreval(">>>>> Escola APRENDER <<<<<")
escreva("Digite o nível do professor (1/2/3): ")
leia(nivel)
escreva("Digite o número de horas trabalhadas: ")
leia(horas)
 
se nivel = 1 entao
    escreval("O professor ganha",horas*12)
senao
    se nivel = 2 entao
        escreval("O professor ganha",horas*17)
    senao
        escreva("O professor ganha",horas*25)
    fimse
fimse
 
fimalgoritmo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
algoritmo "ex35"
// Função : Elabore um algoritmo que, dada a idade de um nadador. 
// Classifique-o em uma das seguintes categorias:
// Infantil A = 5 - 7 anos
// Infantil B = 8 - 10 anos
// juvenil A = 11- 13 anos
// juvenil B = 14 - 17 anos
// Sênior = 18 - 25 anos
// Apresentar mensagem “idade fora da faixa etária” quando for outro ano não contemplado
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
idade: inteiro
 
inicio
// Seção de Comandos 
escreva("Digite a idade do nadador: ")
leia(idade)
escolha idade
    caso 5,6,7
        escreval("Infantil A")
    caso 8,9,10
        escreval("Infantil B")
    caso 11,12,13
        escreval("Juvenil A")
    caso 14,15,16,17
        escreval("Juvenil B")
    caso 18,19,20,21,22,23,24,25
        escreval("Sênior")
    outrocaso
        escreval("Idade fora da faixa etária")
fimescolha
 
fimalgoritmo
1
2
3
4
5
6
7
8
algoritmo "ex36"
// Função : Faça umalgoritmo que calcule o valor da conta de luz de uma 
// pessoa. Sabe-se que o cálculo da conta de luz segue 
a tabela abaixo:
// Tipo de Cliente Valor do KW/h
// 1 (Residência) 0,60
// 2 (Comércio) 0,48
// 3 (Indústria) 1,29
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 16/18
Exercício 38
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
residencia, kw: inteiro
consumo: real
 
inicio
// Seção de Comandos 
escreval("Informe o tipo de residência: ")
escreval("1 - Residência")
escreval("2 - Comércio")
escreval("3 - Indústria")
leia(residencia)
escolha residencia
    caso 1
        escreva("Informe a quantidade de KW gastos no mês: ")
        leia(kw)
        consumo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
algoritmo "ex38"
// Função : Em um curso de Ciência da Computação a nota do estudante é 
// calculada a partir de três notas atribuídas, 
// respectivamente, a um trabalho de laboratório, a uma avaliação semestral // e a um exame final. As notas variam, de 0 
// a 10 e a nota final é a média ponderada das três notas mencionadas. A 
// tabela abaixo fornece os pesos:
// Laboratório Peso 
// Avaliação semestral Peso 3
// Exame final Peso 5 
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
nota1, nota2, nota3: real
media: real
nome, classificacao: caractere
matricula: inteiro
 
inicio
// Seção de Comandos 
escreva("Digite o nome: ")
leia(nome)
escreva("Informe a matrícula: ")
leia(matricula)
escreva("Digite a nota do trabalho de laboratório: ")
leia(nota1)
escreva("Digite a nota da avaliação semestral: ")
leia(nota2)
escreva("Digite a nota do exame final: ")
leia(nota3)
 
media = 8.10 entao
    classificacao <- "A"
senao
    se media >= 7.8 entao
        classificacao <- "B"
    senao
        se media >= 6.7 entao
            classificacao <- "C"
        senao
            se media >= 5.6 entao
                classificacao <- "D"
            fimse
        fimse
    fimse
fimse
se media < 5.6 entao
    classificacao <- "R"
fimse
 
limpatela
escreval("Nome: ",nome)
escreval("Matrícula: ",matricula)
escreval("Nota final: ",media)
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 17/18
Exercício 39
 
DICAS, SUGESTÕES, EXPLICAÇÕES ETC
*******VOCÊ PODE COLABORAR INCLUINDO, AQUI, SUA EXPLICAÇÃO OU DICA******* 
 
Referências
(Você também pode usar o comentário para isto)
Nestas referências deixamos a oportunidade de que você se aperfeiçoe neste
assunto. Vale a pena dar uma olhada:  
Link de busca do Google Exercícios Visual G
Encontre mais
55
56
57
58
escreval("Classificação: ",classificacao)
 
 
fimalgoritmo
algoritmo "ex39"
// Função : Dado o nome de um estudante, com o respectivo número de 
// matrícula e as três notas acima mencionadas, 
// desenvolva um algoritmo para calcular a nota final e a classificação de 
// cada estudante. A classificação é dada 
// conforme a tabela abaixo:
// Nota Final Classificação
// [8,10] A
// [7,8] B
// [6,7] C
// [5,6] D
// [0,5] R
// Imprima o nome do estudante, com o seu número, nota final e classificação.
// Autor :
// Data : 1/12/2010
// Seção de Declarações 
var
idade, grupo: inteiro
nome, grupoRisco: caractere
inicio
// Seção de Comandos 
escreva("Digite o nome: ")
leia(nome)
escreva("Digite a idade: ")
leia(idade)
escreval("Informe o Grupo de risco: ")
escreval("(B)aixo / (M)édio / (A)lto ")
leia(grupoRisco)
se (idade >= 17) e (idade <= 70) entao
se idade <= 20 entao
 escolha grupoRisco
 caso "B"
 grupo
10/12/2015 VisualG – Exercícios para Treinar e Aprender | Partilho
http://partilho.com.br/visualg/exercicios­visualg/visualg­lista­de­exercicios/ 18/18
 *******VOCÊ PODE COLABORAR INCLUINDO, AQUI, MAIS REFERÊNCIAS*******
Veja Mais! Você Vai Gostar.:
PHP – Exercícios
Básicos para
Aprender
 
Exercícios CSharp
para Praticar
Algoritmos
 
se senão VisuALG –
Conceito, Uso e
Exemplos
 
Energia Cinética na
Natureza e na Vida
para Aprender
Este é um trabalho totalmente gratuito com o propósito de servir, motivar e colaborar com
quem deseja aprender e utilizar os assuntos aqui apresentados, para a vida. Temos pessoas
trabalhando no desenvolvimento de postagens, vídeos, presença no site para tirar dúvidas,
enfim, coisas que talvez possam atender alguma forma de expectativa. Por isto, se algumas
das postagens, vídeos ou qualquer coisa compartilhada aqui tenha lhe servido, considere fazer
uma pequena doação, clicando em DOAR. Desta maneira, estará ajudando a dar continuidade
a todo este trabalho. Agradecemos.