Exercícios resolvidos de algoritmos
10. Faça um algoritmo que informar se o número digitado é primo (ou não).
Algoritmo "Primo"
VAR
aux, numero, quant : inteiro
Inicio
escreva("informe o numero: ") leia(numero) para aux de 2 ate numero-1 faca se (numero mod aux = 0) entao quant := quant+1 fimse fimpara se (quant > 0) entao escreva ("nao eh primo") senao escreva("numero primo") fimse fimalgoritmo 39) Elaborar um algoritmo em pseudocodigo que efetue a leitura de um valor que esteja entre a faixa de 1 a 9. Após a leitura do valor fornecido pelo usuário, o programa deverá indicar uma de duas mensagens: “O valor está na faixa permitida”, caso o usuário forneça o valor nesta faixa, ou a mensagem “O valor está fora da faixa permitida”, caso o usuário forneça valores menores que 1 ou maiores que 9. algoritmo "Faixa Permitida" var n :real inicio escreval("Digite um valor: ") leia(n) se(n >= 1) e (n = 0) entao a v3) entao escreval("O maior valor é: ",v1," e o menor é: ",v3) senao se(v1 > v2) e (v1 > v3) e (v3 > v2) entao escreval("O maior valor é: ",v1," e o menor é: ",v2) senao se(v2 > v1) e (v2 > v3) e (v1 > v3) entao escreval("O maior valor é: ",v2," e o menor é: ",v3) senao se(v2 > v1) e (v2 > v3) e (v3 > v1) entao escreval("O maior valor é: ",v2," e o menor é: ",v1) senao se(v3 > v1) e (v3 > v2) e (v1 > v2) entao escreval("O maior valor é: ",v3," e o menor é: ",v2) senao se(v3 > v1) e (v3 > v2) e (v2 > v1) entao escreval("O maior valor é: ",v3," e o menor é: ",v1) fimse fimse fimse fimse fimse fimse fimalgoritmo 48) Escrever um algoritmo para ler