Exercicios Resolvidos

38) Elaborar um algoritmo em pseudocodigo que efetue a leitura de um número inteiro e apresentar uma mensagem informando se o número é par ou ímpar.

algoritmo "Par ou Ímpar"

var

n: inteiro

inicio

escreval("Insira um número inteiro: ")

leia(n)

se(n mod 2 = 0) entao

escreval("O número: ",n," é par")

senao

escreval("O número: ",n," é impar")

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 cinco valores inteiros, calcular a sua média, e escrever na telaos números que são superiores à média.

algoritmo "Média e comparação"

var

notas: vetor [1..5] de inteiro

i, maior_media, soma: inteiro

media: real

inicio

escreval("Digite as 5 notas: ")

para i de 1 ate 5 faca

leia(notas[i])