6/16/2017
VisualG – Exercícios para Treinar e Aprender | Partilho
Partilho
EXERCÍCIOS VISUALG
VISUALG – EXERCÍCIOS PARA TREINAR E
APRENDER
AGOSTO 9, 2014 | MARCOS | 13 COMENTÁRIOS
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
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
1/24
6/16/2017
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
2.36 Exercício 38
2.37 Exercício 39
3 Referências
VisualG – Exercícios para Treinar e Aprender | Partilho
Exercícios de VisuAlG para Aprender Lógica
Veja no Wikipédia
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
Faça um algoritmo que receba dois números e exiba o resultado da sua soma.
Exercício 1
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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)
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
2/24
6/16/2017
VisualG – Exercícios para Treinar e Aprender | Partilho
15 escreva("A soma dos números é: ",x+y)
16
17 fimalgoritmo
Exercício 2
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
Exercício 3
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/combustivel)
fimalgoritmo
Exercício 4
1
2
3
4
5
6
7
8
9
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
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
3/24
6/16/2017
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
var
nome: caractere
salario: real
vendas: real
comissao: real
salarioFinal: real
VisualG – Exercícios para Treinar e Aprender | Partilho
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
Exercício 5
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
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
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
Exercício 6
1
2
3
4
5
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.
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
4/24
6/16/2017
6
7
8
9
10
11
12
13
14
15
16
17
18
// Autor :
// Data : 30/11/2010
// Seção de Declarações
var
a, b, troca: inteiro
VisualG – Exercícios para Treinar e Aprender | Partilho
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
Exercício 7
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
Exercício 8
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
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
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
Exercício 9
1
2
3
4
5
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 :
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
5/24
6/16/2017
6
7
8
9
10
11
12
13
14
15
16
17
// Data : 1/12/2010
// Seção de Declarações
var
correcao, deposito: real
VisualG – Exercícios para Treinar e Aprender | Partilho
inicio
// Seção de Comandos
escreval("Sistema de depósito do Banco do Oeste")
escreva("Digite o valor depositado: ")
leia(deposito)
correcao
Exercício 10
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
Exercício 11
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
Exercício 12
1
2
3
4
5
6
7
8
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.
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
6/24
6/16/2017
9
10
11
12
13
14
15
16
17
18
19
20
VisualG – Exercícios para Treinar e Aprender | Partilho
// 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
Exercício 13
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
Exercício 14
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
Exercício 15
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
7/24
6/16/2017
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
VisualG – Exercícios para Treinar e Aprender | Partilho
algoritmo "ex15"
// 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
Exercício 16
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 <=
// (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
Exercício 17
1 algoritmo "ex17"
2 // Função : Ler 80 números e ao final informar quantos número(s) est(á)ão
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
8/24
6/16/2017
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
VisualG – Exercícios para Treinar e Aprender | Partilho
// 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: ")
leia(num)
se num >= 10 entao
se num <= 150 entao
intervalo
Exercício 18
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
Exercício 19
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
Exercício 20
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
9/24
Exercício 20
6/16/2017
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
VisualG – Exercícios para Treinar e Aprender | Partilho
algoritmo "ex20"
// Função : A concessionária de veículos CARANGO 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
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
Exercício 21
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
Exercício 22
1
2
3
4
5
6
7
8
9
10
11
12
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
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
10/24
6/16/2017
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
VisualG – Exercícios para Treinar e Aprender | Partilho
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
Exercício 23
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 "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.
// 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
Exercício 24
1
2
3
4
5
6
7
8
9
10
11
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
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
11/24
6/16/2017
VisualG – Exercícios para Treinar e Aprender | Partilho
12 // Seção de Comandos
13 programa 0 entao
escreval("Positivo")
14
15
senao
16
se numero = 0 entao
17
escreval("O número é igual a 0")
18
fimse
19
se numero < 0 entao
20
escreval("Negativo")
21
fimse
22
fimse
23
24
25
escreva("Deseja finalizar? (S/N) ")
26
leia(opc)
27
se opc = "S" entao
28
programa
Exercício 25
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 "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)
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
Exercício 26
1
2
3
4
5
6
7
8
9
10
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
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
12/24
6/16/2017
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
VisualG – Exercícios para Treinar e Aprender | Partilho
// 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
Exercício 27
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 "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")
escreva("(G)asolina / (A)lcool / (D)iesel: ")
leia(combustivel)
escolha combustivel
caso "A"
desconto
Exercício 28
1
2
3
4
5
6
7
8
9
10
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
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
13/24
6/16/2017
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
VisualG – Exercícios para Treinar e Aprender | Partilho
// 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, calc, salario: real
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," Reais")
fimalgoritmo
Exercício 29
1
2
3
4
5
6
7
8
9
10
11
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
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
14/24
6/16/2017
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
VisualG – Exercícios para Treinar e Aprender | Partilho
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
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
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
Exercício 32
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
15/24
Exercício 32
6/16/2017
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
VisualG – Exercícios para Treinar e Aprender | Partilho
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
Exercício 33
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
Exercício 34
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
16/24
6/16/2017
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
VisualG – Exercícios para Treinar e Aprender | Partilho
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
// 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
Exercício 35
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 "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")
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
17/24
6/16/2017
33 fimescolha
34
35 fimalgoritmo
VisualG – Exercícios para Treinar e Aprender | Partilho
Exercício 36
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
algoritmo "ex36"
// Função : Faça um algoritmo 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
// 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
Exercício 38
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 "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
// 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)
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
18/24
6/16/2017
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
VisualG – Exercícios para Treinar e Aprender | Partilho
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)
escreval("Classificação: ",classificacao)
fimalgoritmo
Exercício 39
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
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"
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
19/24
6/16/2017
35
grupo
VisualG – Exercícios para Treinar e Aprender | Partilho
DICAS, SUGESTÕES, EXPLICAÇÕES ETC
*******VOCÊ PODE COLABORAR INCLUINDO, AQUI,
SUA EXPLICAÇÃO OU DICA*******
Referências
Encontre mais
(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
*******VOCÊ PODE COLABORAR INCLUINDO, AQUI,
MAIS REFERÊNCIAS*******
Veja Mais! Você Vai Gostar.:
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
20/24
6/16/2017
VisualG – Exercícios para Treinar e Aprender | Partilho
se senão
VisuALG –
Conceito, Uso e
ALGORITMOS
PHP – Exercícios
Básicos para
Aprender
Lógica com
VisualG: Roteiro
para Aprender
Exercícios
CSharp para
Praticar
EXERCÍCIOS
13 IDEIAS SOBRE “VISUALG – EXERCÍCIOS PARA TREINAR E APRENDER”
Rafael Santana
MARÇO 20, 2015 ÀS 5:33 PM
Boa tarde!
Achei ótima a iniciativa. Parabéns, mas gostaria de melhorar um pouco do Exercício 5 sobre
as media do Aluno. Segue:
algoritmo “Media Aluno”
// Função : colotar as 4 notas de um aluno e achar sua media
// Autor : RRS
// Data : 20/03/2015
// Seção de Declarações
var
aluno:caracter
notas: vetor[1..4] de real
i: inteiro
media,soma:real
inicio
LimpaTela
media:=0
soma:=0
Escreval(“########## MEDIA ALUNOS ##########”)
Escreval
Escreva (“* Entre com o nome do aluno: ” )
leia (aluno)
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
21/24
6/16/2017
VisualG – Exercícios para Treinar e Aprender | Partilho
Para i de 1 ate 4 faca
Escreva(“* Digite a “,i,”o nota :”)
leia(notas[i])
FimPara
Para i de 1 ate 4 faca
soma:= (soma + notas[i])
FimPara
Escreval
Escreval(“########## CALCULANDO A MEDIA ##########”)
Escreval
media := (Soma/4)
Escreval(“A sua média foi de “, media:2:1)
Se (media < 5.0) entao
Escreval("Prezado ",aluno," infelizmente você está REPROVADO(A)!!" )
Senao
Se ((media = 5.0) ou (media = 7.0)Entao
Escreval (“Prezado aluno você foi APROVADO(A) no curso. Parabéns!!”)
Fimse
FimAlgoritmo
hubaldo
MARÇO 21, 2015 ÀS 4:10 AM
Olá estou com di�culdades para resolver esta questão,
Crie um algoritmo para armazenar o valor 50 em uma variável W e o valor 65 em uma
variável K. Crie uma variável chamada WK para armazenar a soma do valor de W com o de
K. Escrever WK, W e K, individualmente na tela.
Obs.: as variáveis W e K deverão ser informadas pelo usuário (comando Leia).
�z este código mas não sei como realizar a parte �nal que o exercicio pede,
var
w,k,wk: inteiro
inicio
escreval (“digite as letras w e k”)
leia (w,k)
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
22/24
6/16/2017
VisualG – Exercícios para Treinar e Aprender | Partilho
w <- 50
k <- 65
wk <- w+k
escreval (w)
escreval (k)
�malgoritmo
onde está os erros? obrigado!
henrique da silva marcolino
ABRIL 7, 2015 ÀS 8:33 AM
gostei desta materia
Lucas Manuel
MAIO 2, 2015 ÀS 10:01 AM
Gostei muito dos exercicios
Tungabenvindo Bv
SETEMBRO 12, 2015 ÀS 10:16 PM
Gostei pelo trabalho que lhe digni�ca a eleou ela.
Paulo Ricardo
OUTUBRO 12, 2015 ÀS 7:21 PM
Solicito a solução dos exercícios
Mantius
DEZEMBRO 14, 2015 ÀS 12:09 AM
Tem vários exercícios pela metade T.T
Rogério
MARÇO 14, 2016 ÀS 6:30 PM
Cuidado, alguns exercícios estão corrigidos errado.
Romualdo Junior
MARÇO 15, 2016 ÀS 5:51 PM
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
23/24
6/16/2017
VisualG – Exercícios para Treinar e Aprender | Partilho
Exercício 4 acredito que está errado.
Eu �z da seguinte forma:
Var
nome:caractere
salario,venda:real
Inicio
escreva (“Digite o seu nome: “)
leia (nome)
escreva (“Digite o seu salário �xo: “)
leia (salario)
escreva (“Quantidade de vendas em reais: “)
leia (venda)
salario<-(venda*0.15+salario)
escreval (nome, ", você irá receber: ",salario)
Fimalgoritmo
douglas
MAIO 20, 2016 ÀS 10:35 PM
.
douglas
MAIO 20, 2016 ÀS 10:35 PM
.
Gabriel
JUNHO 6, 2016 ÀS 4:36 AM
Coloquem exercìcios de vetor <3
http://partilho.com.br/aprender/visualg/exerciciosvisualg/visualglistadeexercicios/
24/24