Algoritmos Prontos em Visual G, C++ e Pascal
Por: Evandro.2016 • 8/8/2018 • 675 Palavras (3 Páginas) • 304 Visualizações
...
var
matricula,a,b,media:real
classificacao:caractere
inicio
escreval("Digite numero de matricula:")
leia(matricula)
escreval ("Digite a pontuação da primeira prova:")
leia (a)
escreval ("Digite a pontuação da segunda prova:")
leia (b)
escreval("A soma é", a+b )
media
se media >= 9 entao
classificacao
senao
se media >= 7 entao
classificacao
senao
se media >= 5 entao
classificacao
fimse
fimse
fimse
se media
classificacao
fimse
limpatela
escreval("Matrícula: ",matricula)
escreval("Nota final: ",media)
escreval("Classificação: ",classificacao)
fimalgoritmo
7° Algoritmo
Algoritmo "Autorização para assistir programas"
// Descrição : Com base na idade,
//informar se o usuario tem ou não autorização para assistir o programa
ano, idade:real
Inicio
escreval("Esse programa contém cenas inadequadas para menores de 18 anos.")
escreval("Digite o ano de seu nascimento:")
leia(ano)
idade
escreval("Voçê tem",idade, " anos")
se (idade >= 18) entao
escreval ("Acesso autorizado."," Divirta-se.")
fimse
se (idade
escreval("Acesso não autorizado.")
fimse
Fimalgoritmo
8°Algoritmo
algoritmo "Pagamento de profissional"
// Função : salário de um profissional por hora trabalhada
// Profissional Nível 1 (Fundamental) - R$25,00 por hora/trabalhada
// Professor Nível 2 (Medio) - R$50,00 por hora/trabalhada
// Professor Nível 3 (Superior) - R$75,00 por hora/trabalhada
var
nivel, horas: inteiro
inicio
escreva("Digite o nível do profissional (l/2/3): ")
leia(nivel)
escreva("Digite o número de horas trabalhadas: ")
leia(horas)
se nivel = 1 entao
escreval("O profissional ganhaR$",horas*25)
senao
se nivel = 2 entao
escreval("O profissional ganha R$",horas*50)
senao
escreva("O profissional ganha R$",horas*75)
fimse
fimse
fimalgoritmo
9° Algoritmo
Algoritmo "Região de cada estado brasileiro"
// Descrição : determina as regiões de cada estado brasileiro
var
estado: caractere
Inicio
escreva ("Entre com a cicla de um estado brasileiro: ")
leia (estado)
escolha estado
caso "PA", "TO", "AP", "RR", "AM", "AC", "RO"
escreval ("É um estado da região norte do país.")
caso "MA", "PI", "CE", "BA", "RN", "PE", "AL", "SE", "PB"
escreval ("É um estado da região nordeste do país.")
caso "MT", "GO", "MS"
escreval ("É um estado da região centro oeste do país.")
caso "MG", "SP", "ES", "RJ"
escreval ("É um estado da região sudeste do país.")
caso "PR", "SC", "RS"
escreval ("É um estado da região
...