10° Algoritmo "Lê 3 números e escreve o maior";

Algoritmo "Lê 3 números e escreve o maior";

Var
A, b, C: Real;

Início
Escreva ("Digite o 1° número");
Leia (A);
Escreva ("Digite o 2° número");
Leia (B);
Escreva ("Digite o 3° número");
Leia (C);
Se
(A > B) e (A > C);
Então
Escreva ("O maior é:"A);
Se
(B > A) e (B > C);
Então
Escreva ("O maior é:"B);
Se
(C > A) e (C > B);
Então
Escreva ("O maior é:"C);
Fim Se
Fim

9° Algoritmo "Calcula preços de refeições";

9) Um grupo de cinqüenta alunos chegou a um restaurante para fazer uma confraternização. Foram consumidos os seguintes produtos:

Cerveja: 48 garrafas.

Refrigerante: 20 litros.

Bebidas quentes: 5 garrafas.

Suco: 10 jarras.

Pizzas: 20 unidades.

Porção de batata frita: 15 porções.

A partir dos preços apresentados abaixo, faça o calculo do valor a ser pago. Sabendo-se que deverá ser acrescido 10% a ser destinado ao garçom. O algoritmo deverá calcular o valor total da conta e quanto será pago por cada aluno.

Cerveja: R$ 3,50 - Refrigerante: R$ 3,00 - Bebida quente: R$ 8,00 - Suco: R$ 6,00 - Pizza: R$ 30,00 - Porção de batata frita: R$ R$ 8,00.
Algoritmo
Var
c, r, b, s, pi, ct, cd, p: Real

Início
C ← (3,50 * 48);
r ← (3,00 * 20);
b ← (8,00 * 5);
s ← (6,00 * 10);
pi ← (30,00 * 20);
po ← (8,00 * 15);
ct ← (c + r + b + s + pi + po);
p ← (ct * 0,10);
Escreva ("O total da conta, incluindo os 10% do garçom e já dividido para os 50 alunos é:"cd);
Escreva ("o total da conta é:"p);
Fim

8° Algoritmo "Informação de valor";

8)Faça um algoritmo para informar ao proprietário de um veículo o valor a ser pago para que se possa encher o seu tangue de combustível. Sabe-se que o preço do combustível é R$ 2,54. Você deverá perguntar ao usuário a quantidade de litros que ele deseja que seja colocado em seu veículo. A seguir, informe a ele qual é o valor a ser pago.

Algoritmo "Informação de valor";

Var;
Litros, Total, Preço: Real;

Início
Escreva ("Digite a quantidade de litros");
Leia (Litros);
Escreva ("Digite o preço do combustível");
Leia (Preço);
Total ← (Preço * Litros);
Escreva ("O total a pagar é",Total);
Fim

7° Algoritmo "Calcula o IMC";

7) O curso de nutrição da FAMINAS, solicitou que fizéssemos um programa para calcular IMC (Índice de massa Corpórea). A fórmula para este calculo é: o Peso dividido pela altura elevado ao quadrado. O seu algoritmo deverá solicitar o nome do paciente, o seu peso e a sua altura. A seguir deverá calcular o IMC e apresentar o nome do paciente e o IMC.

Algoritmo "Calcula o IMC";

Var;
Nome: Texto;
IMC, Peso, Altura: Real;

Início
Escreva ("Digite o seu nome");
Leia (Nome);
Escreva (Digite o seu peso");
Leia (Peso);
Escreva ("Digite a sua altura");
Leia (Altura);
IMC ← Peso / (Altura * Altura");
Escreva ("O IMC é",IMC);
Fim

6° Algoritmo "Calcula o custo de fábrica de um carro";

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

Algoritmo "Calcula o custo de fábrica de um carro";

VAR

CUSTO FAB, CUSTO DIS, IMPOSTO, CUSTO FINAL: REAL;

INICIO

ESCREVA ("PROGRAMA PARA CAUCULAR CUSTO DE CARRO");
ESCREVA ("DIGITE O CUSTO DO FABRICANTE");
LEIA (CUSTO FAB);
CUSTO DIS ß 0,28;
IMPOSTO ß 0,45;
CUSTO FINAL ← (CUSTO DIS + IMPOSTO)*CUSTO FAB;
ESCREVA ("O CUSTO FINAL DO CARRO É",CUSTO FINAL);
FIM

5° Algoritmo "Calcula preços";

5) Uma pessoa foi ao supermercado e comprou cinco produtos. Entre com o nome dos produtos e seu respectivo preço e no final escreva o total gasto.

Algoritmo "Calcula o preço de produtos";
Var;
P1, P2, P3, P4,P5: Alfa-numérico;
M1, M2, M3, M4, M5: Texto;
Total: Real;

Início
Escreva ("Caixa do Supermercado");
Escreva("Digite mercadoria")
Leia (M1);
Escreva("Digite preço");
Leia (P1);
Escreva("Digite mercadoria");
Leia (M2);
Escreva("Digite preço");
Leia (P2);
Escreva("Digite mercadoria");
Leia (M3);
Escreva("Digite preço");
Leia (P3);
Escreva("Digite mercadoria");
Leia (M4);
Escreva("Digite preço");
Leia (P4);
Escreva("Digite mercadoria");
Leia (M5);
Escreva("Digite preço");
Leia (P5);
Total ← (P1 + P2 + P3 + P4 + P5);
Escreva ("O valor total é:" Total);
Fim

4° Algoritmo "Faz leitura de horas";

4) Faça um algoritmo que leia o número de horas utilizadas para se realizar determinada tarefa a seguir faça a conversão de horas para minutos. Para finalizar escreva na tela o número de minutos gastos para realizar esta tarefa.

Algoritmo "Faz leitura de horas";
Var
Horas, minutos: Alfa-numérico;

Início
Escreva ("Digite as horas");
Leia (horas);
Escreva ("Digite os minutos");
Leia (minutos);
Minutos ← (60 * horas);
Escreva ("os minutos gastos são:"Minutos);
Fim

3° Algoritmo "Cálculo da média de quatro valores";

3) Faça um algoritmo que leia quatro números e a seguir escreva a sua média.
Algoritmo “Cálculo da média de quatro valores”;
Var;
A,B, C, D, Média: Real;

Início;
Escreva ("Digite o 1° valor");
Leia (A);
Escreva ("Digite o 2° valor")
Leia (B);
Escreva ("Digite o 3° valor")
Leia (C);
Escreva ("Digite o 4° valor")
Leia (D);

Média ← (A + B + C + D )/4;
Escreva ("O valor da Média é:"Média);
FIM

2° Algoritmo "Soma";

2) Faça um algoritmo que leia um dois números e apresente o seu somatório.

Algoritmo “Soma”;

Var;

A,B, Soma: Real;

Início

Escreva(“Programa que calcula a soma de dois números”);

Escreva (“Digite o 1° valor”);

Leia (A);

Escreva (“Digite o 2° valor”);

Leia (B);

Soma ← (A + B);

Escreva (“O valor da soma de dois números é:”Soma);

FIM

1° Algoritmo "Escrever o nome do usuário";

1) Faça um algoritmo que leia o seu nome, idade, telefone e curso e a seguir escreva estes dados na tela.
Algoritmo "Escrever o nome do usuário";
Var
Nome, curso: Texto;
Idade, telefone: Real;

Início
Escreva ("Digite seu nome");
Leia (nome);
Escreva ("Digite a sua idade");
Leia (idade);
Escreva ("Digite o seu telefone");
Leia (telefone);
Escreva ("Digite o seu curso");
Leia (curso);

Escreva("O seu nome é:"nome);
Escreva("Sua idade é:"idade);
Escreva("O seu telefone é:"telefone);
Escreva("O seu curso é:"curso);
Fim