Conversão de Celsius para Fahrenheit
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 a temperatura em Celsius. (Leia: Algoritmo | Conversão entre as escalas Celsius, Kelvin e Fahrenheit)
1 2 3 4 5 6 7 8 9 10 11 12 |
algoritmo "Conversão de Temperaturas" var C, F : real inicio escreva("ºC = ") leia(C) F <- (9 * C + 160) / 5 limpatela escreval(C, " ºC = ", F, " ºF") fimalgoritmo |
Conversão de Fahrenheit para Celsius
Ler uma temperatura em graus Fahrenheit e apresentá-la convertida em graus Celsius. A fórmula de conversão é C = ((F – 32) * 5) / 9, sendo F a temperatura em Fahrenheit e C a temperatura em Celsius. (Leia: Algoritmo | Conversão entre as escalas Celsius, Kelvin e Fahrenheit)
1 2 3 4 5 6 7 8 9 10 11 12 |
algoritmo "Conversão de Temperaturas" var C, F : real inicio escreva("ºF = ") leia(F) C <- ((F - 32) * 5) / 9 limpatela escreval(F, " ºF = ", C, " ºC") fimalgoritmo |
Volume de uma lata de óleo
Calcular e apresentar o valor do volume de uma lata de óleo, utilizando a fórmula VOLUME = 3.14159 * RAIO² * ALTURA.
1 2 3 4 5 6 7 8 9 10 11 12 13 |
algoritmo "Volume Lata de Óleo" var VOLUME, RAIO, ALTURA : real inicio escreva("Digite o valor do RAIO: ") leia(RAIO) escreva("Digite o valor da ALTURA: ") leia(ALTURA) VOLUME <- 3.14159 * RAIO^2 * ALTURA escreval("VOLUME = ", VOLUME:12:2, " m³") fimalgoritmo |
Consumo de Combustível
Efetuar o cálculo da quantidade de litros de combustível gasta em uma viagem, utilizando um automóvel que faz 12 quilômetros por litro. Para obter o cálculo, o usuário deve fornecer o tempo gasto (variável TEMPO) e a velocidade média (variável VELOCIDADE) durante a viagem.
Desta forma, será possível obter a distância percorrida com a fórmula DISTÂNCIA = TEMPO * VELOCIDADE. A partir do valor da distância, basta calcular a quantidade de litros de combustível utilizada na viagem com a fórmula LITROS_USADOS = DISTÂNCIA / 12.
O programa deve apresentar os valores da velocidade média, tempo gasto na viagem, a distância percorrida e a quantidade de litros utilizada na viagem.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
algoritmo "Consumo de Combustível" var TEMPO, VELOCIDADE, DISTANCIA, LITROS_USADOS: real inicio escreva("Tempo gasto (em horas): ") leia(TEMPO) escreva("Velocidade média (em Km/h): ") leia(VELOCIDADE) DISTANCIA <- TEMPO * VELOCIDADE LITROS_USADOS <- DISTANCIA / 12 limpatela escreval("Velocidade média ......: ", VELOCIDADE, " Km/h") escreval("Tempo gasto ...........: ", TEMPO, " h") escreval("Distância percorrida ..: ", DISTANCIA, " Km") escreval("Combustível gasto .....: ", LITROS_USADOS, " litro(s)") fimalgoritmo |
Prestação atrasada
Efetuar o cálculo e apresentar o valor de uma prestação de um bem em atraso, utilizando a fórmula PRESTAÇÃO = VALOR + (VALOR* (TAXA/100) * TEMPO).
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
algoritmo "Cálculo de Prestação em Atraso" var VALOR, TAXA, TEMPO, PRESTACAO : real inicio escreva("Digite o valor da prestação: R$ ") leia(VALOR) escreva("Digite a taxa de juros (em %): ") leia(TAXA) escreva("Digite o tempo de atraso (em dias): ") leia(TEMPO) PRESTACAO <- VALOR + (VALOR * (TAXA/100) * TEMPO) escreval() escreval("PRESTAÇÃO A PAGAR ..: R$ ", PRESTACAO:10:2) fimalgoritmo |
Troca de valores
Ler dois valores para as variáveis A e B e efetuar a troca 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 após a efetivação do processamento da troca.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
algoritmo "Troca de Valores" var A, B, X: real inicio escreva("A = ") leia(A) escreva("B = ") leia(B) X <- A A <- B B <- X escreval("A = ", A) escreval("B = ", B) fimalgoritmo |
Adições e Subtrações de 4 números
Ler quatro valores numéricos inteiros e apresentar o resultado das adições e das multiplicações utilizando o mesmo raciocínio aplicado quando do uso de propriedades distributivas para a máxima combinação possível entre as quatro variáveis.
Não é para calcular a propriedade distributiva, apenas para usar a sua forma de combinação. Considerando a leitura de valores para as variáveis A, B, C e D, devem ser feitas seis adições e seis multiplicações, ou seja, deve ser combinada a variável A com a variável B, a variável A com a variável C, a variável A com a variável D. Depois é necessário combinar a variável B com a variável C e a variável B com a variável D e, por fim, a variável C será combinada com a variável D.
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 "Adições e Subtrações de 4 números" var A, B, C, D : inteiro inicio escreva("A = ") leia(A) escreva("B = ") leia(B) escreva("C = ") leia(C) escreva("D = ") leia(D) escreval() escreval("*** ADIÇÕES ***") escreval("A + B = ", A + B) escreval("A + C = ", A + C) escreval("A + D = ", A + D) escreval("B + C = ", B + C) escreval("B + D = ", B + D) escreval("C + D = ", C + D) escreval() escreval("*** MULTIPLICAÇÕES ***") escreval("A x B = ", A * B) escreval("A x C = ", A * C) escreval("A x D = ", A * D) escreval("B x C = ", B * C) escreval("B x D = ", B * D) escreval("C x D = ", C * D) fimalgoritmo |
Volume de uma Caixa Retangular
Elaborar um programa que calcule e apresente o valor do volume de uma caixa retangular, utilizando a fórmula VOLUME = COMPRIMENTO * LARGURA * ALTURA.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
algoritmo "Volume de uma Caixa Retangular" var VOLUME, COMPRIMENTO, LARGURA, ALTURA : real inicio escreva("Digite o COMPRIMENTO: ") leia(COMPRIMENTO) escreva("Digite a LARGURA: ") leia(LARGURA) escreva("Digite a ALTURA: ") leia(ALTURA) VOLUME <- COMPRIMENTO * LARGURA * ALTURA escreval() escreval("VOLUME = ", VOLUME, " m³") fimalgoritmo |
Quadrado de um número inteiro
Efetuar a leitura de um valor numérico inteiro e apresentar o resultado do valor lido elevado ao quadrado.
1 2 3 4 5 6 7 8 9 |
algoritmo "Quadrado de um número inteiro" var N : inteiro inicio escreva("Digite um número inteiro qualquer: ") leia(N) escreval(N, "^2 = ", N^2) fimalgoritmo |
Quadrado da diferença de dois números
Ler dois valores numéricos inteiros (representados pelas variáveis A e B) e apresentar o resultado do quadrado da diferença do primeiro valor (variável A) em relação ao segundo valor (variável B) .
1 2 3 4 5 6 7 8 9 10 11 |
algoritmo "Quadrado da diferença de dois números" var A, B : inteiro inicio escreva("Digite um número inteiro qualquer: ") leia(A) escreva("Digite outro número inteiro qualquer: ") leia(B) escreval("(A - B)^2 = ", (A - B)^2) fimalgoritmo |
Conversão de Moedas US$ -> R$
Elaborar um programa que apresente o valor da conversão em real (R$) de um valor lido em dólar (US$). O programa deve solicitar o valor da cotação do dólar e também a quantidade de dólares disponível com o usuário.
1 2 3 4 5 6 7 8 9 10 11 |
algoritmo "Conversão de Moedas US$ -> R$" var VALOR_DOLAR, COTACAO : real inicio escreva("Digite a cotação atual do dólar: R$ ") leia(COTACAO) escreva("Digite o valor em dólar: US$ ") leia(VALOR_DOLAR) escreval("US$ ", VALOR_DOLAR:10:2, " = R$ ", VALOR_DOLAR*COTACAO:10:2) fimalgoritmo |
Conversão de Moedas R$ -> US$
Elaborar um programa que apresente o valor da conversão em dólar (US$) de um valor lido em real (R$). O programa deve solicitar o valor da cotação do dólar e também a quantidade de reais disponível com o usuário.
1 2 3 4 5 6 7 8 9 10 11 |
algoritmo "Conversão de Moedas R$ -> US$" var VALOR_REAIS, COTACAO : real inicio escreva("Digite a cotação atual do dólar: R$ ") leia(COTACAO) escreva("Digite o valor em reais: R$ ") leia(VALOR_REAIS) escreval("R$ ", VALOR_REAIS:10:2, " = US$ ", VALOR_REAIS / COTACAO:10:2) fimalgoritmo |
Soma do Quadrado de Três Números
Construir um programa que leia três valores numéricos inteiros (representados pelas variáveis A, B e C) e apresente como resultado final o valor da soma dos quadrados dos três valores lidos.
1 2 3 4 5 6 7 8 9 10 11 12 13 |
algoritmo "Soma do Quadrado de Três Números" var A, B, C : inteiro inicio escreva("A = ") leia(A) escreva("B = ") leia(B) escreva("C = ") leia(C) escreval("A^2 + B^2 + C^2 = ", A^2 + B^2 + C^2) fimalgoritmo |
Quadrado da Soma de Três Números
Construir um programa que leia três valores numéricos inteiros (representados pelas variáveis A, B e C) e apresente como resultado final o valor do quadrado da soma dos três valores lidos.
1 2 3 4 5 6 7 8 9 10 11 12 13 |
algoritmo "Quadrado da Soma de Três Números" var A, B, C : inteiro inicio escreva("A = ") leia(A) escreva("B = ") leia(B) escreva("C = ") leia(C) escreval("(A + B + C)^2 = ", (A + B + C)^2) fimalgoritmo |
Produto e Soma de Quatro Números
Elaborar um programa que leia quatro valores numéricos inteiros (variáveis A, B, C e D). Ao final o programa deve apresentar o resultado do produto (variável P) do primeiro com o terceiro valor, e o resultado da soma (variável S) do segundo com o quarto valor.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
algoritmo "Produto e Soma de Quatro Números" var A, B, C, D : inteiro inicio escreva("A = ") leia(A) escreva("B = ") leia(B) escreva("C = ") leia(C) escreva("D = ") leia(D) escreva() escreval("P = A x C = ", A*C) escreval("S = B + D = ", B+D) fimalgoritmo |
Calcular Novo Salário
Elaborar um programa que leia o valor numérico correspondente ao salário mensal (variável SM) de um trabalhador e também faça a leitura do valor do percentual de reajuste (variável PR) a ser atribuído. Apresentar o valor do novo salário (variável NS).
1 2 3 4 5 6 7 8 9 10 11 12 13 |
algoritmo "Novo Salário" var SM, PR, NS: real inicio escreva("Salário Mensal -> R$ ") leia(SM) escreva("Percentual de Reajuste (em %) -> ") leia(PR) NS <- SM + (PR/100) * SM escreval("Novo Salário -> R$ ", NS:15:2) fimalgoritmo |
Calcular Área do Círculo
Elaborar um programa que calcule e apresente o valor do resultado da área de uma circunferência (variável A). O programa deve solicitar a entrada do valor do raio da circunferência (variável R). Para a execução deste problema utilize a fórmula A = 3.14159265 * R².
1 2 3 4 5 6 7 8 9 10 11 |
algoritmo "Área do Círculo" var A, R: real inicio escreva("Digite o valor do RAIO: ") leia(R) A <- 3.14159265 * R^2 escreval("Área = ", A, " m²") fimalgoritmo |
Apuração Eleitoral
Em uma eleição sindical concorreram ao cargo de presidente três candidatos (representados pelas variáveis A, B e C). Durante a apuração dos votos foram computados votos nulos e em branco, além dos votos válidos para cada candidato. Deve ser criado um programa de computador que faça a leitura da quantidade de votos válidos para cada candidato, além de também ler a quantidade de votos nulos e em branco.
Ao final o programa deve apresentar o número total de eleitores, considerando votos válidos, nulos e em branco; o percentual correspondente de votos válidos em relação à quantidade de eleitores; o percentual correspondente de votos válidos do candidato A em relação à quantidade de eleitores; o percentual correspondente de votos válidos do candidato B em relação à quantidade de eleitores; o percentual correspondente de votos válidos do candidato C em relação à quantidade de eleitores; o percentual correspondente de votos nulos em relação à quantidade de eleitores; e por último o percentual correspondente de votos em branco em relação à quantidade de eleitores.
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 |
algoritmo "Apuração Eleitoral" var A, B, C, nulos, brancos, total: inteiro inicio escreva("Votos de A ..........: ") leia(A) escreva("Votos de B ..........: ") leia(B) escreva("Votos de C ..........: ") leia(C) escreva("Votos NULOS .........: ") leia(nulos) escreva("Votos BRANCOS .......: ") leia(brancos) total <- A + B + C + nulos + brancos escreval() escreval("TOTAL DE ELEITORES .: ", total:6, " voto(s)") escreval("Votos de A .........: ", (A*100/total):6:2, " %") escreval("Votos de B .........: ", (B*100/total):6:2, " %") escreval("Votos de C .........: ", (C*100/total):6:2, " %") escreval("Votos NULOS.........: ", (nulos*100/total):6:2, " %") escreval("Votos BRANCOS.......: ", (brancos*100/total):6:2, " %") fimalgoritmo |
Operações Aritméticas
Elaborar um programa que leia dois valores numéricos reais desconhecidos representados pelas variáveis A e B. Calcular e apresentar os resultados das quatro operações aritméticas básicas.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
algoritmo "Operações Aritméticas" var A, B: real inicio escreva("A = ") leia(A) escreva("B = ") leia(B) escreval() escreval("A + B = ", A+B) escreval("A - B = ", A-B) escreval("A x B = ", A*B) escreval("A : B = ", A/B) fimalgoritmo |
Velocidade Média
Construir um programa que calcule e apresente em metros por segundo o valor da velocidade de um projétil que percorre uma distância em quilômetros a um espaço de tempo em minutos. Utilize a fórmula VELOCIDADE = (DISTÂNCIA* 1000) /(TEMPO* 60).
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
algoritmo "Velocidade Média" var VELOCIDADE, DISTANCIA, TEMPO: real inicio escreva("DISTÂNCIA -> ") leia(DISTANCIA) escreva("TEMPO -> ") leia(TEMPO) VELOCIDADE <- (DISTANCIA * 1000) /(TEMPO * 60) escreval() escreval("VELOCIDADE -> ", VELOCIDADE:10:2, " m/s") fimalgoritmo |
Calcular Volume de uma Esfera
Elaborar um programa de computador que calcule e apresente o valor do volume de uma esfera. Utilize a fórmula VOLUME = (4 / 3) * 3.14159 * (RAIO³).
1 2 3 4 5 6 7 8 9 10 11 12 |
algoritmo "Volume de uma Esfera" var RAIO, VOLUME: real inicio escreva("Digite o RAIO:") leia(RAIO) VOLUME <- (4 / 3) * 3.14159 * (RAIO^3) escreval() escreval("VOLUME = ", VOLUME, " m³") fimalgoritmo |
Potenciação
Elaborar um programa que leia dois valores numéricos inteiros, os quais devem representar a base e o expoente de uma potência, calcule a potência e apresente o resultado obtido.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
algoritmo "Potenciação" var BASE, EXPOENTE, POTENCIA: real inicio escreva("BASE -> ") leia(BASE) escreva("EXPOENTE -> ") leia(EXPOENTE) POTENCIA <- BASE^EXPOENTE escreval() escreval(BASE,"^", EXPOENTE," = ", POTENCIA) fimalgoritmo |
Conversão pé -> metro
Elaborar um programa que leia uma medida em pés e apresente o seu valor convertido em metros, lembrando que um pé mede 0,3048 metro, ou seja, um pé é igual a 30,48 centímetros.
1 2 3 4 5 6 7 8 9 10 |
algoritmo "Conversão pé -> metro" var PES: real inicio escreva("Digite o valor em PÉS: ") leia(PES) escreval() escreval(PES, " pé(s) = ", PES*0.3048, " m") fimalgoritmo |
Radiciação
Elaborar um programa que calcule uma raiz de base qualquer com índice qualquer.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
algoritmo "Radiciação" var BASE, INDICE, RAIZ: real inicio escreva("Digite a BASE: ") leia(BASE) escreva("Digite o ÍNDICE da raiz: ") leia(INDICE) RAIZ <- BASE^(1/INDICE) escreval() escreval("RAIZ = ", RAIZ) fimalgoritmo |
Antecessor e Sucessor
Construir um programa que leia um valor numérico inteiro e apresente como resultado os seus valores sucessor e antecessor.
1 2 3 4 5 6 7 8 9 10 11 |
algoritmo "Antecessor e Sucessor" var n: inteiro inicio escreva("Digite um número inteiro qualquer: ") leia(n) escreval() escreval("Antecessor: ", n-1) escreval("Sucessor:", n+1) fimalgoritmo |
Quadrado da Divisão
Ler dois valores numéricos inteiros (representados pelas variáveis A e B) e apresentar o resultado do quadrado da divisão do primeiro valor (variável A) em relação ao segundo valor (variável B) .
1 2 3 4 5 6 7 8 9 10 11 |
algoritmo "Quadrado da Divisão" var A, B: inteiro inicio escreva("A = ") leia(A) escreva("B = ") leia(B) escreval("(A : B)^2 = ", (A / B)^2) fimalgoritmo |
—
📚 REFERÊNCIA BIBLIOGRÁFICA:
-
- Algoritmos: Lógica Para Desenvolvimento de Programação de Computadores – Edição Revisada e Atualizada
José Augusto N. G. Manzano e Jayr Figueiredo de Oliveira
- Algoritmos: Lógica Para Desenvolvimento de Programação de Computadores – Edição Revisada e Atualizada
—
Deixe suas dúvidas e sugestões logo abaixo.
*Atualizado em 16 de agosto de 2024
Seu artigo me ajudou muito, tem mais algum conteúdo relacionado? Obrigado!
Crie um programa para ler o nome e a velocidade da volta de N pilotos em uma pista de kart.
Ao final do programa, você deve apresentar o nome do piloto com a volta mais rápida, o nome do piloto com a volta mais lenta e a média das voltas de todos os pilotos.
A cada inserção de tempo, pergunte ao usuário se quer continuar informando.
@Jeysmar, elaborei um algoritmo e postei aqui: Algoritmo – Corrida de Kart – kdosh.net
Confira e comente lá! Abraço.