LISTA DE EXERCICIOS 51 ao 75

Prévia do material em texto

LISTA DE EXERCICIOS
ALGORITMO
1. Construa um algoritmo que, tendo como dados de entrada dois pontos quaisquer no plano, P(x1,y1) e P(x2,y2), escreva a distância entre eles. A fórmula que efetua tal cálculo é: 
Algoritmo
Var
x1,y1,x2,y2,d real
Escreva “Digite x1:”
Leia x1
Escreva “Digite y1:”
Leia y1
Escreva “Digite x2:”
Leia x2
Escreva “Digite y2:”
Leia y2
d=raiz((x2-x1)^2+(y2-y1)^2)
Escreva “A distância entre os pontos é: ” d
Fim Algoritmo
2. Escreva um algoritmo que leia três números inteiros e positivos (A, B, C) e calcule a seguinte expressão:
 , onde  
Algoritmo
var
 r,s,d:real
 a,b,c:inteiro
inicio
 escreval("Entre com o primeiro número ")
  leia(a)
  escreval("Entre com o segundo número ")
  leia(b)
  escreval("Entre com o terceiro número ")
  leia(c)
  r<-(a+b)^2
  s<-(b+c)^2
  d<-(r+s)/2
  escreva("O resultado do cálculo é: ",d)
fimalgoritmo
3. Faça um algoritmo que leia a idade de uma pessoa expressa em anos, meses e dias e mostre-a expressa apenas em dias.
Algoritmo
var
   a,m,d : inteiro
inicio 
   escreval("Entre com sua idade somente em anos ")
   leia(a)
   escreval("Entre com sua idade somente em meses ")
   leia(m)
   escreval("Entre com sua idade somente em dias ")
   leia(d)
   d<-(d+(a*365)+(m*30))
   escreva("Sua idade em dias é: ",d)
fimalgoritmo
4. Faça um algoritmo que leia a idade de uma pessoa expressa em dias e mostre-a expressa em anos, meses e dias.
Algoritmo
var
    ano, mes, dia, dias: inteiro
 inicio
    escreva (“Digite a idade em dias:”)
    leia(dias)
    ano<-(dias/365)
    mes<-(dias mod 365)/30
    dia<-(dias mod 365)mod 30
    escreva (“A idade em anos, meses e dias é:”, ano, mes, dia)
 fimalgoritmo
5. Faça um algoritmo que leia as 3 notas de um aluno e calcule a média final deste aluno. Considerar que a média é ponderada e que o peso das notas é: 2,3 e 5, respectivamente.
algoritmo 
  var
   nota1, nota2, nota3, media:real
 inicio
    escreva (“Digite a nota 1:”)
    leia (nota1)
    escreva (“Digite a nota 2:”)
    leia (nota2)
    escreva (“Digite a nota 3:”)
    leia (nota3)
    media<-((nota1*2)+(nota2*3)+(nota3*5))/10
    escreva (“A média ponderada é”, media:5:2)
 fimalgoritmo
6. Faça um algoritmo que leia o tempo de duração de um evento em uma fábrica expressa em segundos e mostre-o expresso em horas, minutos e segundos.
Algoritmo
  var
   horas, minutos, segundos, seg : inteiro
 inicio
    escreva(“Digite a duração do evento em segundos:”)
    leia(segundos)
    horas<-(segundos div 3600)
    minutos<-((segundos mod 3600) div 60)
    seg<-((segundos mod 3600) mod 60)
    escreva(“A duração do evento foi de”, horas,” horas”, minutos ,” minutos e”, seg ,” segundos”)
  fimalgoritmo
7. O custo ao consumidor de um carro novo é a soma do custo de fábrica com a percentagem do distribuidor e dos impostos (aplicados ao custo de fábrica). Supondo que a percentagem do distribuidor seja de 28% e os impostos de 45%, escrever um algoritmo que leia o custo de fábrica de um carro e escreva o custo ao consumidor.
8. Um sistema de equações lineares do tipo:
, pode ser resolvido segundo mostrado abaixo :
 
Escreva um algoritmo que lê os coeficientes a,b,c,d,e e f e calcula e mostra os valores de x e y.
9. Calcule a média aritmética das 3 notas de um aluno e mostre, além do valor da média, uma mensagem de "Aprovado", caso a média seja igual ou superior a 6, ou a mensagem "reprovado", caso contrário.
10. Elaborar um algoritmo que lê 3 valores a,b,c e os escreve. A seguir, encontre o maior dos 3 valores e o escreva com a mensagem : "É o maior ". 
 
a + b + | a - b |
Maior de a e b = ------------------
11. Elaborar um algoritmo que lê 2 valores a e b e os escreve com a mensagem: "São múltiplos" ou "Não são múltiplos".
12. Elabore um algoritmo que dada a idade de um nadador classifica-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
adulto = maiores de 18 anos
13. Escreva um algoritmo que leia 3 números inteiros e mostre o maior deles.
14. Escreva um algoritmo que leia o código de um aluno e suas três notas. Calcule a média ponderada do aluno, considerando que o peso para a maior nota seja 4 e para as duas restantes, 3. Mostre o código do aluno, suas três notas, a média calculada e uma mensagem "APROVADO" se a média for maior ou igual a 5 e "REPROVADO" se a média for menor que 5.
15. Faça um algoritmo que leia um nº inteiro e mostre uma mensagem indicando se este número é par ou ímpar, e se é positivo ou negativo.
16. O cardápio de uma lancheria é o seguinte:
	Especificação
	Código
	Preço
	Cachorro quente
	100
	1,20
	Bauru simples
	101
	1,30
	Bauru com ovo
	102
	1,50
	Hambúrger
	103
	1,20
	Cheeseburguer
	104
	1,30
	Refrigerante
	105
	1,00
Escrever um algoritmo que leia o código do item pedido, a quantidade e calcule o valor a ser pago por aquele lanche. Considere que a cada execução somente será calculado um item.
17. Tendo como dados de entrada a altura e o sexo de uma pessoa (?M? masculino e ?F? feminino), construa um algoritmo que calcule seu peso ideal, utilizando as seguintes fórmulas:
- para homens: (72.7*h)-58
- para mulheres: (62.1*h)-44.7
18. Um banco concederá um crédito especial aos seus clientes, variável com o saldo médio no último ano. Faça um algoritmo que leia o saldo médio de um cliente e calcule o valor do crédito de acordo com a tabela abaixo. Mostre uma mensagem informando o saldo médio e o valor do crédito. (use o comando caso-de e não faça repetições) 
	Saldo médio
	Percentual
	de 0 a 200
	nenhum crédito
	de 201 a 400
	20% do valor do saldo médio
	de 401 a 600
	30% do valor do saldo médio
	acima de 601
	40% do valor do saldo médio
19. Um usuário deseja um algoritmo onde possa escolher que tipo de média deseja calcular a partir de 3 notas. Faça um algoritmo que leia as notas, a opção escolhida pelo usuário e calcule a média.
1 –aritmética
2 -ponderada (3,3,4) 
3 -harmônica
20. Um vendedor necessita de um algoritmo que calcule o preço total devido por um cliente. O algoritmo deve receber o código de um produto e a quantidade comprada e calcular o preço total, usando a tabela abaixo:
	Código do Produto
	Preço unitário
	1001
	5,32
	1324
	6,45
	6548
	2,37
	0987
	5,32
	7623
	6,45
21. Um vendedor precisa de um algoritmo que calcule o preço total devido por um cliente. O algoritmo deve receber o código de um produto e a quantidade comprada e calcular o preço total, usando a tabela abaixo. Mostre uma mensagem no caso de código inválido.
	Código
	Preço unitário
	'ABCD'
	R$ 5,30
	'XYPK'
	R$ 6,00
	'KLMP'
	R$ 3,20
	'QRST'
	R$ 2,50
22. Uma empresa concederá um aumento de salário aos seus funcionários, variável de acordo com o cargo, conforme a tabela abaixo. Faça um algoritmo que leia o salário e o cargo de um funcionário e calcule o novo salário. Se o cargo do funcionário não estiver na tabela, ele deverá, então, receber 40% de aumento. Mostre o salário antigo, o novo salário e a diferença. 
	Código
	Cargo
	Percentual
	101
	Gerente
	10%
	102
	Engenheiro
	20%
	103
	Técnico
	30%
23. Elaborar um algoritmo que lê 3 valores a,b,c e verifica se eles formam ou não um triângulo. Supor que os valores lidos são inteiros e positivos. Caso os valores formem um triângulo, calcular e escrever a área deste triângulo. Se não formam triângulo escrever os valores lidos. ( se a > b + c não formam triângulo algum, se a é o maior).
24. Escrever um algoritmo que lê a hora de início de um jogo e a hora do final do jogo (considerando apenas horas inteiras) e calcula a duração do jogo em horas, sabendo-se que o tempo máximo de duração do jogo é de 24 horas e que o jogo pode iniciar em um dia e terminar no dia seguinte.
25. Escrever um algoritmo que lê um conjunto de 4 valores i, a, b, c, onde i é um valor inteiro e positivo e a, b, c, são quaisquervalores reais e os escreva. A seguir: 
a) Se i=1 escrever os três valores a, b, c em ordem crescente. 
b) Se i=2 escrever os três valores a, b, c em ordem decrescente. 
c) Se i=3 escrever os três valores a, b, c de forma que o maior entre a, b, c fique dentre os dois.
26. Escrever um algoritmo que lê um valor em reais e calcula qual o menor número possível de notas de 100, 50, 10, 5 e 1 em que o valor lido pode ser decomposto. Escrever o valor lido e a relação de notas necessárias.
27. Escrever um algoritmo que lê:
- a percentagem do IPI a ser acrescido no valor das peças 
- o código da peça 1, valor unitário da peça 1, quantidade de peças 1 
- o código da peça 2, valor unitário da peça 2, quantidade de peças 2
O algoritmo deve calcular o valor total a ser pago e apresentar o resultado.
Fórmula : (valor1*quant1 + valor2*quant2)*(IPI/100 + 1)
28. Escrever um algoritmo que lê a hora de início e hora de término de um jogo, ambas subdivididas em dois valores distintos : horas e minutos. Calcular e escrever a duração do jogo, também em horas e minutos, considerando que o tempo máximo de duração de um jogo é de 24 horas e que o jogo pode iniciar em um dia e terminar no dia seguinte.
29. Escrever um algoritmo que lê o número de identificação, as 3 notas obtidas por um aluno nas 3 verificações e a média dos exercícios que fazem parte da avaliação. Calcular a média de aproveitamento, usando a fórmula:
MA = (Nota1 + Nota2 x 2 + Nota3 x 3 + ME )/7
A atribuição de conceitos obedece a tabela abaixo:
	Média de Aproveitamento
	Conceito
	9,0
	A
	7,5 e < 9,0
	B
	6,0 e < 7,5
	C
	4,0 e < 6,0
	D
	< 4,0
	E
O algoritmo deve escrever o número do aluno, suas notas, a média dos exercícios, a média de aproveitamento, o conceito correspondente e a mensagem: APROVADO se o conceito for A,B ou C e REPROVADO se o conceito for D ou E.
30. O departamento que controla o índice de poluição do meio ambiente mantém 3 grupos de indústrias que são altamente poluentes do meio ambiente. O índice de poluição aceitável varia de 0,05 até 0,25. Se o índice sobe para 0,3 as indústrias do 1o grupo são intimadas a suspenderem suas atividades, se o índice cresce para 0,4 as do 1o e 2o grupo são intimadas a suspenderem suas atividades e se o índice atingir 0,5 todos os 3 grupos devem ser notificados a paralisarem suas atividades. Escrever um algoritmo que lê o índice de poluição medido e emite a notificação adequada aos diferentes grupos de empresas.
31. Escrever um algoritmo que calcule os sucessivos valores de E usando a série abaixo e considerando primeiro 3 termos, depois 4 termos e, por fim, 5 termos:  
E = 1 + 1 / 1! + 1 / 2! + 1 / 3! + 1 / 4!
32. Ler três notas de um aluno, calcular a média e informar se ele foi aprovado (Média ≥7), reprovado (Média < 7) ou aprovado com louvor (Média = 10)
33.Fazer um algoritmo que:
•Leia um número indeterminado de linhas contendo cada uma a idade de um indivíduo.
•A última linha que não entrará nos cálculos, contém o valor da idade igual a zero.
•Calcule e escreva a idade média deste grupo de indivíduos.
•Escreva também a maior idade e a menor
34.Faça um algoritmo que calcule a soma dos números inteiros de 1 a 100.
35.Fazer um algoritmo para calcular e escrever a soma dos cubos dos números pares compreendidos entre B e A (B > A). B e A são lidos pelo teclado.
36.Faça um algoritmo que lê uma temperatura em Fahrenheit e calcula a temperatura correspondente em Celsius. Ao final o programa deve exibir as duas temperaturas.
–Usar a fórmula: C = (5 * (F-32) / 9)
37.Numa eleição existem três candidatos identificados pelos números 1, 2 e 3. Faça um algoritmo que compute o resultado de uma eleição. Inicialmente o programa deve pedir o número total de votantes. Em seguida, deve pedir para cada votante votar (informando o numero do candidato) e ao final mostrar o número de votos de cada candidato.
38. Anacleto tem 1,50m e cresce 2 centímetros por ano, enquanto Felisberto tem 1,10 e cresce 3 centímetros por ano. Construa um programa que calcule e apresente quantos anos serão necessários para que Felisberto seja maior que Anacleto.
39. Construa um programa que exiba a tabuada de 1 até N.
40. Fazer um algoritmo para calcular e escrever a seguinte soma: 
37x38/1 + 36x37/2 + 35x36/2 + ... + 1x2/37
41. Tem-se um conjunto de dados contendo a altura e o sexo (masculino, feminino) de 50 pessoas. Fazer um algoritmo que calcule e escreva: 
•-a maior e a menor altura do grupo; 
•-a média de altura das mulheres; 
•-o número de homens;
•-A porcentagem de homens e de mulheres.
42. Escreva um algoritmo que armazene o valor 10 em uma variável A e o valor 20 em uma variável B. A seguir (utilizando apenas atribuições entre variáveis) troque os seus conteúdos fazendo com que o valor que está em A passe para B e vice-versa. Ao final, escrever os valores que ficaram armazenados nas variáveis.
Escreva um algoritmo para ler um valor (do teclado) e escrever (na tela) o seu antecessor.
43. Escreva um algoritmo para ler as dimensões de um retângulo (base e altura), calcular e escrever a
área do retângulo.
44. Faça um algoritmo que leia a idade de uma pessoa expressa em anos, meses e dias e escreva a idade
dessa pessoa expressa apenas em dias. Considerar ano com 365 dias e mês com 30 dias.
45. Escreva um algoritmo para ler o número total de eleitores de um município, o número de votos
brancos, nulos e válidos. Calcular e escrever o percentual que cada um representa em relação ao total
de eleitores.
46 Escreva um algoritmo para ler o salário mensal atual de um funcionário e o percentual de reajuste. Calcular e escrever o valor do novo salário.
47 O custo de um carro novo ao consumidor é a soma do custo de fábrica com a porcentagem do distribuidor e dos impostos (aplicados ao custo de fábrica). Supondo que o percentual do distribuidor seja de 28% e os impostos de 45%, escrever um algoritmo para ler o custo de fábrica de um carro, calcular e escrever o custo final ao consumidor. 
48 Uma revendedora de carros usados paga a seus funcionários vendedores um salário fixo por mês, mais uma comissão também fixa para cada carro vendido e mais 5% do valor das vendas por ele efetuadas. Escrever um algoritmo que leia o número de carros por ele vendidos, o valor total de suas vendas, o salário fixo e o valor que ele recebe por carro vendido. Calcule e escreva o salário final do vendedor.
Ler um valor e escrever a mensagem É MAIOR QUE 10! se o valor lido for maior que 10, casocontrário escrever NÃO É MAIOR QUE 10!
49 Ler um valor e escrever se é positivo ou negativo (considere o valor zero como positivo).
50 As maçãs custam R$ 1,30 cada se forem compradas menos de uma dúzia, e R$ 1,00 se forem compradas pelo menos 12. Escreva um programa que leia o número de maçãs compradas, calcule e escreva o custo total da compra.
51 Ler as notas da 1a. e 2a. avaliações de um aluno. Calcular a média aritmética simples e escrever uma mensagem que diga se o aluno foi ou não aprovado (considerar que nota igual ou maior que 6 o aluno é aprovado). Escrever também a média calculada.
Algoritmo "media calculada"
Var
// Seção de Declarações das variáveis 
 n1,n2, nota:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
 escreva("digite a nota A1 de 0 a 5 :")
 leia(n1)
 escreva("digite a nota A2 de 0 a 5 :")
 leia(n2)
 nota<-((n1*n2)/2)
 se(nota>=6) entao
 escreval("A1=",n1," e A2=",n2," Aluno aprovado com nota =", nota)
 senao
 escreval("A1=",n1," e A2=",n2," Aluno reprovado com nota =", nota)
fimse
Fimalgoritmo
52 Ler o ano atual e o ano de nascimento de uma pessoa. Escrever uma mensagem que diga se ela poderá ou não votar este ano (não é necessário considerar o mês em que a pessoa nasceu).
Algoritmo "votar maior de 16"
Var
// Seção de Declarações das variáveis 
 ano_atual,ano_nasc,idade :real
Inicio
// Seção de Comandos, procedimento, funções, operadores,etc... 
 escreva("digite o ano atual - ")
 leia(ano_atual)
 escreva("digite o ano nascimento - ")
 leia(ano_nasc)
 idade<-ano_atual-ano_nasc
 se(idade>=16) entao
 escreval(" você tem ",idade," anos e poderá votar")
 senao
 Idade<-ano_atual-ano_nasc
 escreval(" você tem ",idade," anos você e não poderá votar esse ano ")
fimse
Fimalgoritmo
53 Ler dois valores (considere que não serão lidos valores iguais) e escrever o maior deles.
Algoritmo "nota maior "
Var
// Seção de Declarações das variáveis 
 n1,n2:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
 escreva("digite um numero qualquer: ")
 leia(n1)
 escreva("digite o segundo numero não igual ao primeiro: ")
 leia(n2)
 se(n1>n2) entao
 escreval(n1," e maior que ",n2)
 senao
 escreval(n2," e maior que ",n1)
fimse
Fimalgoritmo
54 Ler dois valores (considere que não serão lidos valores iguais) e escrevê-los em ordem crescente.
Algoritmo "nota aluno"
Var
// Seção de Declarações das variáveis 
 n1,n2,i:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
 escreva("digite um numero qualquer :")
 leia(n1)
 escreva("digite um numero qualuer diferente do que digitou antes:")
 leia(n2)
 se(n1<n2) entao
 escreval("ondem crescente dos numeros",n1,",",n2)
 senao
 escreval("ordem crescente dos numeros",n2,",",n1)
fimse
Fimalgoritmo
55 Ler a hora de início e a hora de fim de um jogo de Xadrez (considere apenas horas inteiras, sem os minutos) e calcule a duração do jogo em horas, sabendo-se que o tempo máximo de duração do jogo é de 24 horas e que o jogo pode iniciar em um dia e terminar no dia seguinte.
Algoritmo "jogo xadrez"
Var
// Seção de Declarações das variáveis
 hi,hf,hd:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
escreval ("Duração de partida de jogo de xadrez ")
 escreval("Hora de inicio da partida de 0 a 24: ")
 leia(hi)
 escreval("Somente a hora do fim da partida 0 a 24: ")
 leia(hf)
 se(hi>=hf)entao
 hd<-(24-hi)+hf
 escreval("Duração de jogo",hd)
 senao
 hd<-(24-hf)+hi
 escreval("Duração de jogo",hd)
 
fimse
Fimalgoritmo
56 A jornada de trabalho semanal de um funcionário é de 40 horas. O funcionário que trabalhar mais de 40 horas receberá hora extra, cujo cálculo é o valor da hora regular com um acréscimo de 50%. Escreva um algoritmo que leia o número de horas trabalhadas em um mês, o salário por hora e escreva o salário total do funcionário, que deverá ser acrescido das horas extras, caso tenham sido trabalhadas
(considere que o mês possua 4 semanas exatas).
Algoritmo "Calculo de Salario"
Var
// Seção de Declarações das variáveis 
sh,hm,he, s,t:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval("Digite as horas trabalhada no mês minimo 160 horas:")
leia(hm)
escreval ("Qual o salario do funcionario : ")
leia(s)
sh<-s/160
se(hm>160)entao
he<-hm-160
he<-(he+he*0.5)*sh
t<-s+(he)
escreval("Salario mes R$:",s,", salario total com hora extra R$: ",t)
senao
escreval("Salario mes R$:",s,", salario sem hora extra R$:",s)
fimse
Fimalgoritmo
57 Para o enunciado a seguir foi elaborado um algoritmo em Português Estruturado que contém erros, identifique os erros no algoritmo apresentado abaixo:
Enunciado: Tendo como dados de entrada o nome, a altura e o sexo (M ou F) de uma pessoa, calcule e mostre seu peso ideal, utilizando as seguintes fórmulas:
- para sexo masculino: peso ideal = (72.7 * altura) - 58
- para sexo feminino: peso ideal = (62.1 * altura) - 44.7
Não veio o algoritmo.
58 Ler o salário fixo e o valor das vendas efetuadas pelo vendedor de uma empresa. Sabendo-se que ele recebe uma comissão de 3% sobre o total das vendas até R$ 1.500,00 mais 5% sobre o que ultrapassar este valor, calcular e escrever o seu salário total.
Algoritmo "calcular e escrever o seu salário total"
Var
// Seção de Declarações das variáveis 
s,v,a,b,c:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval("Digite seu salario")
leia(s)
escreval("o Total de vendas")
leia(v)
se (v > 1500)entao
a<- v*0.05
b<- s+a
escreval("Salario total= ",b)
senao
a<- v*0.03
b<- s+a
escreval("Salario total= ",b)
fimse
Fimalgoritmo
59 Faça um algoritmo para ler: número da conta do cliente, saldo, débito e crédito. Após, calcular e escrever o saldo atual (saldo atual = saldo - débito + crédito). Também testar se saldo atual for maior ou igual a zero escrever a mensagem 'Saldo Positivo', senão escrever a mensagem 'Saldo Negativo'.
Algoritmo "'Saldo Positivo Saldo Negativo'."
Var
// Seção de Declarações das variáveis
nc,s,d,c,sa:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
escreval("Informe o número da conta: ")
leia(nc)
escreval("Informe o saldo: ")
leia(s)
escreval("Informe o débito e o crédito, respectivamente: ")
leia(d,c)
  sa <-(s-d)+c
se (sa>=0)entao
 escreval("Saldo Positivo")
senao
 escreval ("Saldo negativo") 
fimse
Fimalgoritmo
60 Faça um algoritmo para ler: quantidade atual em estoque, quantidade máxima em estoque e quantidade mínima em estoque de um produto. Calcular e escrever a quantidade média ((quantidade média = quantidade máxima + quantidade mínima)/2). Se a quantidade em estoque for maior ou igual a quantidade média escrever a mensagem 'Não efetuar compra', senão escrever a mensagem 'Efetuar compra'.
Algoritmo "'Saldo Positivo Saldo Negativo'."
Var
// Seção de Declarações das variáveis
q_atual_est,q_maxima_est,q_minima_est,q_media:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
escreval("Quantidade atual em estoque: ")
leia(q_atual_est)
escreval("Quantidade maxima de estoque: ")
leia(q_maxima_est)
escreval("IQuantidade minima de estoque: ")
leia(_minima_est)
q_media<-(q_maxima_est + q_minima_est)/2
se (q_maxima_est>=q_media)entao
 escreval("Não Efetuar compra")
senao
 escreval ("Efetuar compra") 
fimse
Fimalgoritmo
61 Ler um valor e escrever se é positivo, negativo ou zero.
Algoritmo "Positivo, negativo e zero"
Var
// Seção de Declarações das variáveis
n:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
escreval("Digite um numero")
leia(n)
se (n=0)entao
 escreval("Zero")
fimse
se (n < 0)entao
 escreval ("negativo")
fimse
se (n > 0)entao
 escreval("Positivo")
fimse
Fimalgoritmo
62 Ler 3 valores (considere que não serão informados valores iguais) e escrever o maior deles.
Algoritmo "3 numeros mostre maior"
Var
// Seção de Declarações das variáveis 
n1,n2,n3:real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval("Digite 3 numeros diferente em seguida")
escreval ("Digite um numero e clique enter")
leia(n1,n2,n3)
se ((n1>n2) e (n1>n3))entao
 escreval("maior numero digitado foi: ",n1)
se ((n2>n1) e (n2>n3))entao
 escreval("maior numero digitado foi: ",n2)
senão
 escreval("maior numero digitado foi: ",n3)
fimse
fimse
Fimalgoritmo
63 Ler 3 valores (considere que não serão informados valores iguais) e escrever a soma dos 2 maiores.
Algoritmo "3 numeros mostre maior"
var:n1,n2,n3; 
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval("dig o rpimeiro num"); 
leia (n1); 
escreval("dig segundo num"); 
leia(n2); 
escreval("dig o terceiro num"); 
leia(n3); 
se n1>n3 e se n2>n3 entao 
escreva(n1*n2) 
se n2>n1 e n3>n1 entao 
escreval(n2*n3); 
se n1>n2 e se n3 >n2 entao 
escreval(n1*n3) 
fimse
fimse
fimse
Fimalgoritmo
64 Ler 3 valores (considere que não serão informados valores iguais) e escrevê-los em ordem crescente.
algoritmo "Numeros em ordem crescente"
var 
a, b, c: inteiro 
Inicio
//Seção de Comandos, procedimento, funções, operadores, etc... 
escreval("dig o rpimeiro num"); 
leia (a); 
escreval("dig segundo num"); 
leia(b); 
escreval("dig o terceiro num"); 
leia(c); 
se (a>b e a>c) entao 
se (b>c) entao 
escreval(a, b, c) 
senao 
escreval(a, c, b) 
fimse 
senao 
se (b>a e b>c) entao 
se(a>c) entao 
escreval(b, a, c) 
senao 
escreval(b, c, a) 
fimse 
senao 
se (b>a) entao 
escreval(c, b, a) 
senao 
escreval(c, a, b) 
fimse 
fimse 
fimse 
fimalgoritmo
65 Ler 3 valores (A, B e C) representando as medidas dos lados de um triângulo e escrever se formam ou não um triângulo. OBS: para formar um triângulo, o valor de cada lado deve ser menor que a soma dos outros 2 lados.
algoritmo "Formação triangulo" 
var 
venda, valor, salario, total:real 
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval (" Digite o salário") 
leia (salario) 
escreval (" Digite o valor de vendas") 
leia (venda) 
se (venda <= 1.500) entao 
valor := 3 
senao 
valor := 5 
fimse 
escreval ("Salário: ", (salario) + ((venda * valor)/100)) 
fimalgoritmo 
66 Ler o nome de 2 times e o número de gols marcados na partida (para cada time). Escrever o nome do vencedor. Caso não haja vencedor deverá ser impressa a palavra EMPATE.
Algoritmo "Validador De Partida"
Var
// Seção de Declarações das variáveis 
 golstime1, golstime2:inteiro
 nometime1, nometime2 :caracter
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval("Digite o nome do time 1")
leia(nometime1)
escreval("Digite o numero de gols feitos (time 1)")
leia(golstime1)
escreval("Digite o nome do time 2")
leia(nometime2)
escreval("Digite o numero de gols feitos (time 2)")
leia(golstime2)
se (golstime1 > golstime2) entao
escreval(nometime1," ganhou")
fimse
se (golstime1 < golstime2) entao
escreval(nometime2," ganhou")
fimse
se (golstime1 = golstime2) entao
escreval("empate")
fimse
Fimalgoritmo
67 Ler dois valores e imprimir uma das três mensagens a seguir:
‘Números iguais’, caso os números sejam iguais
‘Primeiro é maior’, caso o primeiro seja maior que o segundo;
‘Segundo maior’, caso o segundo seja maior que o primeiro.
Algoritmo "Três mensagens"
var 
numero1: inteiro 
numero2: inteiro 
inicio 
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval("Digite o primeiro numero") 
leia(numero1) 
escreval("Digite o segundo numero") 
leia(numero2) 
se numero1=numero2 entao 
escreval("Numeros iguais") 
senao 
se numero1>numero2 entao 
escreval("O primeiro e maior") 
senao 
escreval("O sgundo e maior") 
fimse 
fimse 
fimalgoritmo
68 Um posto está vendendo combustíveis com a seguinte tabela de descontos:
até 20 litros, desconto de 3% por litro Álcool acima de 20 litros, desconto de 5% por litro até 20 litros, desconto de 4% por litro Gasolina acima de 20 litros, desconto de 6% por litro Escreva um algoritmo que leia o número de litros vendidos e o tipo de combustível (codificado da seguinte forma: A-álcool, G-gasolina), calcule e imprima o valor a ser pago pelo cliente sabendo-se que o preço do litro da gasolina é R$ 3,30 e o preço do litro do álcool é R$ 2,90.
Algoritmo "tabela de combustíveis. "
var 
qtd_litros: inteiro 
preco_alcool, preco_gas, desconto, valor_a_pagar: real 
combustivel: caracter 
inicio 
// Seção de Comandos, procedimento, funções, operadores, etc... 
preco_alcool <- 2.90 
preco_gas <- 3.30 
leia (combustivel) 
leia(qtd_litros) 
se (combustivel = "A") entao 
se (qtd_litros > 20) entao 
desconto <- 0.05 
senao 
desconto <- 0.03 
fimse 
valor_a_pagar <- (qtd_litros * preco_alcool) * (1 - desconto) 
senao // combustivel = "G" 
se (qtd_litros > 20) entao 
desconto <- 0.06 
senao 
desconto <- 0.04 
fimse 
valor_a_pagar <- (qtd_litros * preco_gas) * (1 - desconto) 
fimse 
escreval ("Valor a pagar: ", valor_a_pagar) 
fimalgoritmo
69 Escreva um algoritmo que leia as idades de 2 homens e de 2 mulheres (considere que as idades dos homens serão sempre diferentes entre si, bem como as das mulheres). Calcule e escreva a soma das idades do homem mais velho com a mulher mais nova, e o produto das idades do homem mais novo com a mulher mais velha.
algoritmo "Leia Idade" 
var 
aux,m,m1,h,h1:real 
inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
 
escreval("Digite idade do homem: ") 
leia(h) 
escreval("Digite idade do homem: ") 
leia(h1) 
escreval("Digite idade da Mulher: ") 
leia(m) 
escreval("Digite idade da Mulher: ") 
leia(m1) 
se h<h1 entao 
aux <- h 
h <- h1 
h1 <- aux 
fimse 
se m<m1 entao 
aux <- m 
m <- m1 
m1 <- aux 
fimse 
escreval("A soma das idades do homem mais velho com a mulher mais nova : ",h+m1:2:0) 
escreval("O produto das idades do homem mais novo com a mulher mais velha: ",h1*m:2:0) 
fimalgoritmo
70 Uma fruteira está vendendo frutas com a seguinte tabela de preços:
Até 5 Kg			 Acima de 5 Kg
Morango 	R$ 2,50 Kg 			R$ 2,20 por Kg
Maçã 		R$ 1,80 Kg 			R$ 1,50 por Kg
Se o cliente comprar mais de 8 Kg em frutas ou o valor total da compra ultrapassar R$ 25,00, receberá ainda um desconto de 10% sobre este total. Escreva um algoritmo para ler a quantidade (em Kg) de morangos e a quantidade (em Kg) de maças adquiridas e escreva o valor a ser pago pelo cliente.
algoritmo "Fruteiras" 
var
Qkgmor, Qkgmaca, Ttlkg, Vttlmor, Vttlmaca, Vfinal, Vfdesc, Desc10:real
mor250, mor220, maca180, maca150: real
inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreva ("Digite a quantidade de morangos, e maçãs: ")
leia(Qkgmor, Qkgmaca)
Ttlkg<- Qkgmor+Qkgmor
mor250<- 250
maca180<- 180
mor220<- 220
maca150<- 150
 se(Ttlkg <= 5) e (Vfinal < 25) entao
 Vttlmor<- mor250*Qkgmor
 Vttlmaca<- maca180*Qkgmaca
 Vfinal<- Vttlmor+Vttlmaca
 escreval ("O valor total dos morangos é: ", Vttlmor)
 escreval ("O valor total das maçãs é: ", Vttlmaca)
 se(Ttlkg > 7) entao
 Desc10<- Vfinal*10/100
 Vfdesc<- Vfinal-Desc10
 escreva ("Você ganhou um desconto por levar mais de 8kg, pagará: ", Vfdesc)
 senao
 escreval ("Totalizando: ", vfinal)
 fimse
 senao
 Vttlmor<- mor220*Qkgmor
 Vttlmaca<- maca150*Qkgmaca
 Vfinal<- Vttlmor+Vttlmaca
 escreval ("O valor total dos morangos é: ", Vttlmor)
 escreval ("O valor total das maçãs é: ", Vttlmaca)
 escreval ("Totalizando: ", Vfinal)
 Desc10<- Vfinal*10/100
 Vfdesc<- Vfinal-Desc10
 escreva ("Você ganhou um desconto de 10%, pagará: ", Vfdesc)
 fimse
fimalgoritmo
71 Faça um algoritmo para ler um número que é um código de usuário. Caso este código seja diferente de um código armazenado internamente no algoritmo (igual a 1234) deve ser apresentada a mensagem ‘Usuário inválido!’. Caso o Código seja correto, deve ser lido outro valor que é a senha. Se esta senha estiver incorreta (a certa é 9999) deve ser mostrada a mensagem ‘senha incorreta’. Caso a senha esteja correta, deve ser mostrada a mensagem ‘Acesso permitido’.
algoritmo "Fruteiras" 
Var
codigo, senha: inteiro
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval("Digite o código do usuário: ")
leia(codigo)
 se (codigo<>1234) entao
 escreval("Usuário inválido")
senao
 escreval("Digite a Senha: ")
 leia(senha)
se (senha<>9999) entao
escreval ("Senha incorreta!")
senao
escreval ("Acesso Permitido!")
fimse
fimse
Fimalgoritmo
72 Faça um algoritmo para ler: a descrição do produto (nome), a quantidade adquirida e o preço unitário. Calcular e escrever o total (total = quantidade adquirida * preço unitário), o desconto e o total a pagar (total a pagar = total - desconto), sabendo-se que:
- Se quantidade <= 5 o desconto será de 2%
- Se quantidade> 5 e quantidade <=10 o desconto será de 3%
- Se quantidade > 10 o desconto será de 5%
algoritmo "descontos sobre pagamento" 
var 
produto: literal 
qtde: inteiro 
preco_un, preco_total, desconto, total_a_pagar: real 
inicio 
// Seção de Comandos, procedimento, funções, operadores, etc... 
leia (produto) 
leia (qtde) 
leia (preco_un) 
preco_total <- qtde * preco_un 
se (qtde <= 5) entao 
desconto <- preco_total * 0.02 
senao 
se (qtde <= 10) entao 
desconto <- preco_total * 0.03 
senao 
desconto <- preco_total * 0.05 
fimse 
fimse 
total_a_pagar <- preco_total - desconto 
escreval ("Total: ", preco_total, " Desconto: ", desconto, " Total a pagar: ", total_a_pagar) 
fimalgoritmo
73 Uma empresa quer verificar se um empregado está qualificado para a aposentadoria ou não. Para estar em condições, um dos seguintes requisitos deve ser satisfeito:
- Ter no mínimo 65 anos de idade.
- Ter trabalhado no mínimo 30 anos.
- Ter no mínimo 60 anos e ter trabalhado no mínimo 25 anos.
Com base nas informações acima, faça um algoritmo que leia: o número do empregado (código), o ano de seu nascimento e o ano de seu ingresso na empresa. O programa deverá escrever a idade e o tempo de trabalho do empregado e a mensagem 'Requerer aposentadoria' ou 'Não requerer'.
algoritmo "descontos sobre pagamento" 
var
ano,codigo, idade, tempoTrabalho:real
inicio 
// Seção de Comandos, procedimento, funções, operadores, etc... 
ano <- 2011 
escreval("Entre com seu codigo: ") 
leia(codigo) 
escreval("Entre com a data de nascimento: ") 
leia(idade) 
escreval("Entre com o Ano de ingresso na empresa: ") 
leia(tempoTrabalho) 
se( ano-idade >= 16 )entao 
se(ano-idade >= 65)entao 
escreval("Requerer Aposentadoria ") 
senao 
se(ano-tempoTrabalho >= 30)entao 
escreval("Requerer Aponsentadoria ") 
senao 
se((ano-idade >= 60) e (ano-tempoTrabalho >= 25) )entao 
escreval("Requerer Aponsentadoria ") 
senao 
escreval("Nao Requerer Aponsentadoria ") 
fimse 
fimse 
fimse 
senao 
escreval("Voce não tem idade para trabalhar ") 
fimse 
fimalgoritmo
74 Seja o seguinte algoritmo:
inicio
ler a, b, c
se (a < b+c) e (b <a+c) e (c <a+b) então
se (a=b) e (b=c) então
mens _ 'Triângulo Equilátero'
senão
se (a=b) ou (b=c) ou (a=c) então
mens _ 'Triângulo Isósceles'
senão
mens _ 'Triângulo Escaleno'
fim_se
fim_se
senão
mens _ 'Não e possível formar um triângulo'
fim_se
escrever mens
fim
Faça um teste de mesa e complete o quadro a seguir para os seguintes valores das variáveis:
Variáveis
A	 b	 C	 Mens 
1	 2	 3 
3	 4	 5
2	 2	 4
4	 4	 4
5	 3	 3
digite um numero qualquer :1
digite um numero qualuer diferente do que digitou antes:2
digite um numero qualuer diferente do que digitou antes:3
Não e possível forma um triângulo
>>> Fim da execução do programa !
digite um numero qualquer :4
digite um numero qualuer diferente do que digitou antes:5
digite um numero qualuer diferente do que digitou antes:6
Triângulo Escaleno
>>> Fim da execução do programa ! 
digite um numero qualquer :2
digite um numero qualuer diferente do que digitou antes:2
digite um numero qualuer diferente do que digitou antes:4
Não e possível forma um triângulo
>>> Fim da execução do programa !
digite um numero qualquer :4
digite um numero qualuer diferente do que digitou antes:4
digite um numero qualuer diferente do que digitou antes:4
Triangulo Equilátero
>>> Fim da execução do programa !
digite um numero qualquer :5
digite um numero qualuer diferente do que digitou antes:3
digite um numero qualuer diferente do que digitou antes:3
Triângulo Isósceles
>>> Fim da execução do programa !
75 Escreva um algoritmo para ler 2 valores e se o segundo valor informado for ZERO, deve ser lido um novo valor, ou seja, para o segundo valor não pode ser aceito o valor zero e imprimir o resultado da divisão do primeiro valor lido pelo segundo valor lido. 
Acrescente uma mensagem 'NOVO CÁLCULO (S/N)?' Se for respondido 'S' deve retornar e executar um novo cálculo, caso contrário deverá encerrar o algoritmo.
algoritmo "divisão" 
var num1, num2, divis:real 
condicao:logico 
inicio 
// Seção de Comandos, procedimento, funções, operadores, etc... 
escreval ("Digite um numero para ser o dividendo") 
leia (num1) 
condicao <- verdadeiro 
enquanto (condicao) faca 
escreval ("Digite outro valor para ser o divisor") 
leia (num2) 
se (num2 = 0) entao 
escreval ("numero digitado inválido") 
fimse 
se (num2 <> 0) entao 
condicao <- falso 
fimse 
fimenquanto 
divis <- (num1/num2) 
escreval ("O resultado da divisão é: ",divis) 
fimalgoritmo
76 Escreva um algoritmo para imprimir os números de 1 (inclusive) a 10 (inclusive) em ordem crescente.
77 Escreva um algoritmo para imprimir os números de 1 (inclusive) a 10 (inclusive) em ordem decrescente.
78 Escreva um algoritmo para imprimir os 10 primeiros números inteiros maiores que 100.
79 Escreva um algoritmo para ler 10 números e ao final da leitura escrever a soma total dos 10 números lidos.
80 Escreva um algoritmo para ler 10 números. Todos os números lidos com valor inferior a 40 devem ser somados. Escreva o valor final da soma efetuada.
81 Uma loja está levantando o valor total de todas as mercadorias em estoque. Escreva um algoritmo que permita a entrada das seguintes informações: a) o número total de mercadorias no estoque; b) o valor de cada mercadoria. Ao final imprimir o valor total em estoque e a média de valor das mercadorias.
82 O mesmo exercício anterior, mas agora não será informado o número de mercadorias em estoque. Então o funcionamento deverá ser da seguinte forma: ler o valor da mercadoria e perguntar ‘MAIS MERCADORIAS (S/N)?’. Ao final, imprimir o valor total em estoque e a média de valor das mercadorias em estoque.
83 Faça um programa que leia 100 valores e no final, escreva o maior e o menor valor lido.
84 Faça um algoritmo para ler o código e o preço de 15 produtos, calcular e escrever:
- o maior preço lido
- a média aritmética dos preços dos produtos
85 A prefeitura de uma cidade deseja fazer uma pesquisa entre seus habitantes. Faça um algoritmos para coletar dados sobre o salário e número de filhos de cada habitante e após as leituras, escrever:
a) Média de salário da população
b) Média do número de filhos
c) Maior salário dos habitantes
d) Percentual de pessoas com salário menor que R$ 150,00
86 Escreva um algoritmo que imprima as seguintes seqüências de números: (1, 1 2 3 4 5 6 7 8 9 10) (2, 1 2 3 4 5 6 7 8 9 10) (3, 1 2 3 4 5 6 7 8 9 10) (4, 1 2 3 4 5 6 7 8 9 10) e assim sucessivamente, até que o primeiro número (antes da vírgula), também chegue a 10.