TrabalhosGratuitos.com - Trabalhos, Monografias, Artigos, Exames, Resumos de livros, Dissertações
Pesquisar

Algoritmos respondidos

Por:   •  24/4/2015  •  Relatório de pesquisa  •  699 Palavras (3 Páginas)  •  332 Visualizações

Página 1 de 3

1)

algoritmo "recebe_um_numero"

// função :

// autor :

// data : 10/04/2015

// seção de declarações

var

num:inteiro

inicio

escreval ("digite um número de 0 á 10")

leia (num)

escolha (numero)

caso 1,2,3,4,5,6,7,8,9,10

outrocaso

escreval("numero inválido")

fimescolha

fimalgoritmo

______________________________________________________________________

2)

algoritmo "dois_valores"

// função :

// autor :

// data : 10/04/2015

// seção de declarações

var

nr1,nr2:inteiro

inicio

escreva("digite o primeiro valor:")

leia (nr1)

escreva("digite o segundo valor:")

leia (nr2)

se (nr1>nr2) entao

escreval("valor primeiro é maior que valor segundo!")

senao

escreval("valor segundo é maior que valor primeiro!")

fimse

fimalgoritmo

______________________________________________________________________

3)

algoritmo "média"

// função :

// autor :

// data : 10/04/2015

// seção de declarações

var

nt1,nt2,nt3,media:real

inicio

escreva ("digite a primeira nota:")

leia(nt1)

escreva ("digite a segunda nota:")

leia(nt2)

escreva ("digite a terceira nota:")

leia(nt3)

media<-(nt1+nt2+nt3)/3

se(media>=6)entao

escreval("o aluno esta aprovado!")

senao

escreval("o aluno esta reprovado!")

fimse

fimalgoritmo

______________________________________________________________________

4)

algoritmo "entrada_de_boate"

// função :

// autor :

// data : 10/04/2015

// seção de declarações

var

sexo:literal

idade:inteiro

inicio

escreval("digite sexo [m] / [f]")

leia (sexo)

escreval("digite idade")

leia(idade)

se (idade <18) entao

escreval ("entrada proibida")

senao

se (sexo="m") entao

escreva("entrada liberada: r$ 20,00")

fimse

se (sexo="f") entao

escreva("entrada liberada: r$ 10,00")

fimse

fimse

fimalgoritmo

______________________________________________________________________

5)

algoritmo "reajuste_salário"

// função :

// autor :

// data : 10/04/2015

// seção de declarações

var

sal,nsl,rjl:real

inicio

escreva ("digite o salário:")

leia(sal)

se(sal>500)entao

rjl<-(sal*0.1)

nsl<-(sal+rjl)

senao

rjl<-(sa*0.15)

nsl<-(sal+rjl)

fimse

escreva("o novo salário é:",nsl)

fimalgoritmo

______________________________________________________________________

6)

algoritmo "maior_que_20"

// função :

// autor :

// data : 12/04/2015

// seção de declarações

var

   x: inteiro

inicio

escreva ("digite um número:")

leia (x)

se (x > 20) entao

escreva (x,"é maior que 20!")

senao

escreva (x,"não é maior que 20!")

fimse

fimalgoritmo

______________________________________________________________________

7)

algoritmo "valor_númerico"

// função :

// autor :

// data : 12/04/2015

// seção de declarações

var

nr1,nr2,result:inteiro

inicio

escreval ("digite o número 1:")

leia(nr1)

escreval ("digite o número 2:")

leia (nr2)

result<-(nr1+nr2)

se(result>10)entao

escreval ("a soma é maior que 10:",result)

senao

escreval ("a soma é menor que 10:",result)

fimse

fimalgoritmo

______________________________________________________________________

8)

algoritmo "dado"

// função :

// autor :

// data : 12/04/2015

// seção de declarações

var

n:inteiro

inicio

escreva ("digite um número inteiro:")

leia(n)

se (n % 2=0) entao

escreval(n,"é par")

senao

escreval(n,"é impar")

fimse

fimalgoritmo

______________________________________________________________________

9)

algoritmo "positivo_negativo_nulo"

// função :

// autor :

// data : 12/04/2015

// seção de declarações

var

n:inteiro

inicio

escreva("digite um número inteiro:")

leia (n)

se(n=0)entao

escreval("nulo")

senao

se(n>0) entao

escreval("positivo")

senao

escreval("negativo")

fimse

fimse

fimalgoritmo

______________________________________________________________________

10)

algoritmo "ler_dois_numeros"

// função :

// autor :

// data : 12/04/2015

// seção de declarações

var

nr1,nr2,result,soma:real

inicio

escreval("digite o número 1:")

...

Baixar como (para membros premium)  txt (11.3 Kb)   pdf (61.4 Kb)   docx (16 Kb)  
Continuar por mais 2 páginas »
Disponível apenas no TrabalhosGratuitos.com