Lista 2 - Pagina 41
Exercícios resolvidos da
apostila Manzano usando a estrutura de decisão do tipo SE.
a. Ler
dois valores numéricos inteiros e apresentar o resultado da diferença do maior
pelo menor valor.
Algoritmo "diferença do maior pelo menor"
//
Var
// Seção de Declarações das variáveis
a,b: inteiro
Inicio
// Seção de Comandos, procedimento,
funções, operadores, etc...
escreval ("digite o valor de
a")
leia (a)
escreval ("digite o valor de
b")
leia (b)
se (a>b) entao
escreval ("a diferença do
maior pelo menor é:", a-b)
senao
escreval ("a diferença do
maior pelo menor é:", b-a)
fimse
Fimalgoritmo
b. Efetuar
a leitura de um valor inteiro positivo ou negativo e apresentar o número lido
como sendo um valor positivo, ou seja, o programa deverá apresentar o módulo de
um número fornecido. Lembre-se de verificar se o número fornecido é menor que
zero; sendo, multiplique-o por -1.
Algoritmo "modulo"
//
Var
// Seção de Declarações das variáveis
a: inteiro
Inicio
// Seção de Comandos, procedimento,
funções, operadores, etc...
escreval ("digite um valor")
leia (a)
se (a<0) entao
a <- a*(-1)
senao
fimse
escreval ("o modulo desse numero
é:", a)
Fimalgoritmo
c. Ler
quatro valores referentes a quatro notas escolares de um aluno e imprimir uma
mensagem dizendo que o aluno foi aprovado, se o valor da média escolar for
maior ou igual a 5. Se o aluno não foi aprovado, indicar uma mensagem
informando esta condição. Apresentar junto das mensagens o valor da média
do aluno para qualquer condição.
Algoritmo "nota escolar"
//
Var
// Seção de Declarações das variáveis
a,b,c,d,m: real
Inicio
// Seção de Comandos, procedimento,
funções, operadores, etc...
escreval ("digite a primeira
nota")
leia(a)
escreval ("digite a segunda
nota")
leia(b)
escreval ("digite a terceira
nota")
leia(c)
escreval ("digite a quarta
nota")
leia(d)
m <- (a+b+c+d)/4
se (m>=5) entao
escreval ("o aluno foi
aprovado com média:",m)
senao
escreval ("o aluno foi
reprovado com média:",m)
fimse
Fimalgoritmo
d. Ler
quatro valores referentes a quatro notas escolares de um aluno e imprimir uma
mensagem dizendo que o aluno foi aprovado, se o valor da média escolar for
maior ou igual a 7. Se o valor da média for menor que 7, solicitar a nota
de exame, somar com o valor da média e obter nova média. Se a nova média
for maior ou igual a 5, apresentar uma mensagem dizendo que o aluno
foi aprovado em exame. Se o aluno não foi aprovado, indicar uma mensagem
informando esta condição. Apresentar com as mensagens o valor da média do
aluno, para qualquer condição.
Algoritmo "media escolar"
//
//
//
Var
// Seção de Declarações das variáveis
A,B,C,D,M,EXAME,NM:real
Inicio
// Seção de Comandos, procedimento,
funções, operadores, etc...
escreval ("digite a primeira
nota")
leia (A)
escreval ("digite a segunda
nota")
leia (B)
escreval ("digite a terceira
nota")
leia (C)
escreval ("digite a quarta
nota")
leia (D)
m <- (A+B+C+D)/4
se (M>=7) entao
escreval ("o aluno foi
aprovado com média:",M)
senao
escreval ("o aluno ficou de
EXAME com média:",M)
escreval ("")
escreval ("digite a nota de
exame")
leia (EXAME)
NM <- (M+EXAME)/2
se (NM>=5) entao
escreval ("o
aluno foi aprovado em EXAME com média:",NM)
senao
escreval ("o
aluno foi reprovado em EXAME com média:",NM)
fimse
fimse
Fimalgoritmo
e. Efetuar
a leitura de três valores (variáveis A, B e C) e efetuar o cálculo da equação
completa de segundo grau, apresentando as duas raízes, se para os valores
informados for possível efetuar o referido cálculo. Lembre-se de que a
variável A deve ser diferente de zero.
Algoritmo "RAIZQ "
//
//
//
Var
// Seção de Declarações das variáveis
A,B,C, delta: real
raizPositiva, raizNegativa: real
Inicio
// Seção de Comandos, procedimento,
funções, operadores, etc...
escreval("Digite o valor de A")
leia (A)
escreval("Digite o valor de B")
leia (B)
escreval("Digite o valor de C")
leia (C)
delta <-((B^2)-(4*A*C))
se (delta >= 0) e (A<>0) entao
raizPositiva <-(-B +
raizq(delta))/2*A
raizNegativa <-(-B -
raizq(delta))/2*A
escreval ("As raízes são: x1
= ", raizPositiva, " e x2 = ", raizNegativa)
senao
escreval("a divisão por 0 é
indeterminada")
fimse
Fimalgoritmo