exercicio de progamaçao resolvidos visualg

Prévia do material em texto

Ler um numero e calcular o dobro
algoritmo "calcular o dobro"
var
valor, dobro : inteiro
inicio
escreva ("digite um valor")
leia (valor)
dobro <- (2*valor)
escreva ("o dobro e", dobro)
fimalgoritmo
Escrever um programa para ler um numero inteiro e exibir seu sucessor e seu antecessor 
algoritmo "antecessor e sucessor"
var
valor, antecessor, sucessor : real
inicio
escreva ("digite valor")
leia (valor)
antecessor <- (valor-1)
sucessor <- (valor+1)
escreva ("antecessor e", antecessor )
escreva ("sucessor e", sucessor)
fimalgoritmo
Ler dois números e escrever a diferença entre o maior e o menor valor lido 
algoritmo "semnome"
// Função :
// Autor :
// Data : 13/04/2016
// Seção de Declarações 
var
n1, n2, subt : inteiro
inicio
escreval ("digite o primeiro numero")
leia (n1)
escreval ("digite o segundo numero")
leia(n2)
se n1>n2 entao
subt<- (n1-n2)
senao
subt <-(n2-n1)
 fimse
escreval (" a diferença é ",subt)
// Seção de Comandos 
fimalgoritmo
Fazer um fluxograma para ler a hora, minuto e segundo e converter tudo para segundos.
Fazer um fluxograma para ler dois tempos (hora, minuto e segundo) e escrever a diferença de tempo dentre eles.
Todo restaurante, embora por lei não possa abrigar o cliente a pagar, cobra 10% para o garçom. Fazer um algoritmo que leia o valor gasto com as despesas realizadas em um restaurante e imprima o valor da gorjeta e o valor da despesas (despesas + gorjetas)
algoritmo "gorjeta"
var
despezas, gorjeta : real
inicio
escreva ("digite valor da despezas")
leia (despezas)
gorjeta <- (1.1*despezas)
escreva ("valor total e", gorjeta)
fimalgoritmo
Para vários tributos a base de calculo e o salario mínimo. Fazer um algoritimo que leia o valor do salario mínimo e o valor do salario de uma pessoa. Calcular e exibir quantos salario mínimos essa pessoa ganha.
algoritmo "salario minimo"
var
salario, salario_pessoal, quantidade : real
inicio
escreva ("valor de um salario")
leia (salario)
escreva ("quanto e seu salrio?")
leia (salario_pessoal)
quantidade <- (salario_pessoal/salario)
escreva ("a quantidade de salarios e", quantidade)
fimalgoritmo
Criar um algoritimo que exiba a media aritimetica entre os números 7,8 e 9
algoritmo "media"
var
nota1, nota2, nota3, media : real
inicio
escreva ("digite primeira nota")
leia (nota1)
escreva ("digite segunda nota")
leia (nota2)
escreva ("digite terceira nota")
leia (nota3)
media <- (nota1 + nota2 + nota3)/3
escreva ("a media e", media)
fimalgoritmo
Escrever um algoritimo que entre com 4 numeros reais e exiba a media ponderada. Sabendo-se que os pesos são respectivamente: 1, 2, 3 e 4
algoritmo "semnome"
var
n1, n2, n3, n4, p1, p2, p3, p4, mp : real
inicio
escreval ("digite a primeira nota: ")
leia (n1)
escreval ("digite o peso: ")
leia (p1)
escreval ("digite a segunda nota: ")
leia (n2)
escreval ("digite o peso: ")
leia (p2)
escreval ("digite a terceira nota: ")
leia (n3)
escreval ("digite o peso: ")
leia (p3)
escreval ("digite a quarta nota: ")
leia (n4)
escreval ("digite o peso: ")
leia (p4)
mp <- (n1*p1+n2*p2+n3*p3+n4*p4)/(p1+p2+p3+p4)
escreval ("a media ponderada e: ", mp)
fimalgoritmo
Fazer um aplicativo que obtenha do usuário o saldo de uma aplicação e imprima o novo saldo considerando o rendimento de 2,5%.
algoritmo "conta bancaria"
var
valor, total : real
inicio
escreva ("digite saldo atual")
leia (valor)
total <- (1.025* valor)
escreva ("seu novo saldo e", total)
fimalgoritmo
Fazer um aplicativo que entre com a base e altura de um retângulo e exiba seu perimetro e sua área. Saber que 
Perímetro = 2* (base + altura)
Área = base * altura 
algoritmo "area e perimentro de retangulo"
var
base, altura, perimetro, area : real
inicio
escreva ("digite a o tamnho da base")
leia (base)
escreva("digite a altura")
leia (altura)
perimetro <- (base+ altura)*2
area <- (base*altura)
escreva ("o perimetro e", perimetro, "e a area e", area)
fimalgoritmo
Criar um aplicativo que calcule e exiba a área de um triangulo. Saber-se que.
Área = (base * altura)/2
algoritmo "area de um triangulo"
var
base, altura, area : real
inicio
escreva ("digite a base ")
leia (base)
escreva ("digite altura")
leia (altura)
area <- (base*altura)/2
escreva ("a area e", area)
fimalgoritmo
Criar um aplicativo que leia uma temperatura em graus centigrafos e apresente-a convertida em graus Fahrenheit. A formula de conversão é.
F = (9*C+160)/5
algoritmo "celsius para fahrenheit"
var
celsius, fahrenheit : real
inicio
escreva ("digete em grau e celsius")
leia (celsius)
fahrenheit <- (9*celsius+160)/5
escreva ("graus em fahrenheit e", fahrenheit)
fimalgoritmo
F= temperatura em Fahrenheit e C= centigrafos 
Criar um aplicativo que leia o valor de uma hora e informe quantos minutos se passaram desde inicio do dia ate aquela hora.
algoritmo "horas"
var
horas, minutos : real
inicio
escreva ("que horas sao?")
leia (horas)
minutos <- (horas*60)
escreva ("ja se passaram", minutos, "minutos")
fimalgoritmo
Criar um aplicativo que leia o peso de uma pessoa em quilograma. Calcule e exiba o peso da pessoa em grams e o novo peso em gramas. Se a pessoa engordar 12%
Em épocas de pouco dinheiro os comerciantes procuram aumentar suas vendas oferecendo desconto. Faça um aplicativo que possa entrar om o valor de um produto e exiba o novo valor tendo em vista que o desconto foi de 9%
algoritmo "desconto"
var
produto, desconto : real
inicio
escreva ("digite o valor do produto")
leia (produto)
desconto <- (0.91*produto)
escreva ("o valor do produto e", desconto)
fimalgoritmo
Uma conta de caderneta de poupaçafoi aberta com um deposito de R$500,00. Faça um programa que calcule o valor do saldo da conta após cinco meses. Considerando que a conta é remunerada em 1,2% de juros ao mês.
Determinar a quantidade de litros de combustível gastos em uma viagem por um automóvel que faz 12Km/l. para isso sabe-se que o tempo gasto na viagem é t= 35min e a velocidade media do automóvel e v= 80km/h
Faça um programa para ler valores para as variáveis inteiras A e B. Efetuar a troca dos valores de forma que a variável A passe a possuir o valor da variável B e que a variável B passe a possuir o valor da variável A. Apresentar os valores iniciais e valores finais de A e B.
Tendo como dados de entrada a distancia total (em km) percorrida por um automóvel e a quantidade de combustível (em litros) consumida para percorre-la. Calcule e imprima o consumo médio de combustível.
algoritmo "consumo medio"
var
km, litro, consumo_medio : real
inicio
escreva ("distancia pencorrida")
leia (km)
escreva ("quantidade de litros")
leia (litro)
consumo_medio <- (km/litro)
escreva ("o consumo medio e", consumo_medio)
fimalgoritmo
algoritmo "media"
var
nota1, nota2, nota3, nota4, media : real
contador, qtd : inteiro
inicio
escreval ("digite a quantidade de alunos")
leia (qtd)
contador <- 0
enquanto contador < qtd faca
contador <- contador + 1
escreval ("digite a primeira nota")
leia (nota1)
escreval ("digite a segunda nota")
leia (nota2)
escreval ("digite a terceira nota")
leia (nota3)
escreval ("digite a quarta nota")
leia (nota4)
media <- (nota1+nota2+nota3+nota4)/4
 se media >= 7 entao
 escreval ("aprovado com a media: ", media)
 senao
 se media < 4.5 entao
 escreval ("reprovado com a media: ", media)
 senao
 escreval ("recuperacao com a media: ", media)
 fimse
 fimse
fimenquanto
fimalgoritmo