Banco De Dados

Disciplina: Lógica de Programação

1. Faça um algoritmo que receba dois números e exiba o resultado da sua soma.

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

2. 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.

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

3. 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).

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 <- (notas[1] + notas[2] + notas[3]) / 3

limpatela

escreval("aluno")

escreval("Média: ",media)

fimalgoritmo

4. 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.

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 <- a

a <- b

b <- troca

limpatela

escreval("O novo valor de A é: ",a)

escreval("O novo valor de B é: ",b)

fimalgoritmo

5. 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.

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 <- (9*cel+160)/5

escreval("A nova temperatura é: ",far,"ºF")

fimalgoritmo

6. 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.

var

distancia, combustivel: real

inicio

// Seção de Comandos

escreval("Cálculo de consumo médio de combustível")

escreva("Digite a distância percorrida: ")

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

7. 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.

var

nome: caractere

salario, vendas, comissão, salarioFinal: real

inicio

// Seção de Comandos

escreval("Digite o nome do vendedor: ")

leia(nome)

escreval("Digite o salário: ")

leia(salario)