40 Ex. de algoritmos

EXERCÍCIOS DE ALGORITMO 1 AO 40 algoritmo "ex1"

var x, y: inteiro

inicio

escreval("Digite o primeiro numero: ") leia(x) escreval("Digite o segundo numero: ") leia(y) escreva("A soma dos numeros e: ",x+y)

fimalgoritmo

algoritmo "ex2"

var x, y: real

inicio escreva("Digite o primeiro numero: ") leia(x) escreva("Digite o segundo numero: ") leia(y) escreval("A soma e: ",x+y) escreval("A subtracao e: ",x-y) escreval("A multiplicacao e: ",x*y) escreval("A divisao e: ",x/y)

fimalgoritmo

algoritmo "ex3"

var distancia, combustivel: real

inicio escreva("Digite a distancia pecorrida: ") leia(distancia) escreva("Digite o combustivel gasto: ") leia(combustivel) escreval("O consumo medio de combustivel do seu veiculo e: ",distancia/combustivel) fimalgoritmo

algoritmo "ex4"

var nome: caractere salario: real vendas: real comissao: real salarioFinal: real

inicio escreva("Digite o nome do vendedor: ") leia(nome) escreva("Digite o salario: ") leia(salario) escreva("Informe a quantidade de vendas deste no mes: ") leia(vendas) comissao <- 0.15 * vendas salarioFinal <- salario + comissao limpatela escreval("- Nome: ",nome) escreval("- Salario: ",salario) escreval("- Salario Final (salario + comissao): ",salarioFinal)

fimalgoritmo

algoritmo "ex5"

var aluno: caractere notas: vetor[1..3] de real x: inteiro media: real

inicio 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(">>> Media: ",media)

fimalgoritmo

algoritmo "ex6"

var a, b, troca: inteiro

inicio

escreva("Digite o valor(numerico) da variavel A: ") leia(a) escreva("Digite o valor(numerico) da variavel B: ") leia(b) troca <- a a <- b b <- troca limpatela escreval("O novo valor