Trabalho de Informatica

QUESTÃO1

algoritmo "calcular a soma e uma multiplicação quest:1"

// Função :

// Autor :

// Data : 04/07/19

// Seção de Declarações

var

   a,b,c,d,m,n:real

inicio

escreval ("informe a")

leia(a)

escreval ("informe b")

leia(b)

escreval ("informe c")

leia(c)

escreval ("informe d")

leia(d)

m:= a*c

n:=b+d

escreval("resultado da multiplicação e:",m)

escreval ("resultado da soma e:",n)

fimalgoritmo

algoritmo "semnome"

// Função :

// Autor :

// Data : 04/07/19

// Seção de Declarações

var

preco,valor,litros:real

inicio

escreval("informe o preco do litro de combustivel:")

leia(preco)

escreval("informe o valor que deseja abastecer:")

leia(valor)

litros:= valor/preco

escreval("a quantidade de litros abastecidos com seu valor foi de:",litros)

fimalgoritmo

algoritmo "semnome"

// Função :

// Autor :

// Data : 04/07/19

// Seção de Declarações

var

valor,prestacao,juros,dias:real

inicio

escreval("informe o valor do boleto:")

leia(valor)

escreval("o percentual de juros cobrados e:")

leia(juros)

escreval("informe o numero de dias em atraso:")

leia(dias)

prestacao:=valor+(valor*(juros/100))*dias

escreval("o novo valor da prestacao e de:",prestacao)

fimalgoritmo

algoritmo "semnome"

// Função :

// Autor :

// Data : 04/07/19

// Seção de Declarações

var

a,b,c,brancos,nulos,et: inteiro

percentuala,percentualb,percentualc,percentualbrancos,percentualnulos:real

inicio

escreva("informe o numero de votos de a:")

leia(a)

escreva("informe o numero de votos de b:")

leia(b)

escreva("informe o numero de votos de c:")

leia(c)

escreva("informe o numero de votos brancos:")

leia(brancos)

escreva("informe o numero de votos nulos:")

leia(nulos)

et:=a+b+c+brancos+nulos

percentuala:=((a/et)*100)

percentualb:=((b/et)*100)

percentualc:=((c/et)*100)

percentualbrancos:=((brancos/et)*100)

percentualnulos:=((nulos/et)*100)

escreval("o numero total de eleitores e:",et)

escreval("o epercentual de a:",percentuala)

escreval("o epercentual de b:",percentualb)

escreval("o epercentual de c:",percentualc)

escreval("o epercentual de brancos:",percentualbrancos)

escreval("o epercentual de nulos:",percentualnulos)

fimalgoritmo

ATIVIDADE 2

algoritmo "semnome"

// Função :

// Autor :

// Data : 11/07/19

// Seção de Declarações

var

peso,altura,imc:real

inicio

escreval("informe o peso do paciente:")

leia(peso)

escreval("informe a altura:")

leia(altura)

imc:=peso/altura*altura

se (imc<18.5)entao

   escreval("o paciente esta abaixo do peso")

senao

   se((imc>18.5) e (imc<25))entao

      escreval(" o paciente esta com peso normal")

   senao

      se(imc>30)entao

         escreval("o paciente esta acima do peso")

      fimse

   fimse

fimse

fimalgoritmo

----------------------------------------------------------------------------------------------------------------------------

algoritmo "semnome"

// Função :

// Autor :

// Data : 11/07/19

// Seção de Declarações

var ma,me,nota1,nota2,nota3,numero:real

inicio

escreval("informe o numero do aluno:")

leia(numero)

escreval("informe a nota 1 do aluno:")

leia(nota1)

escreval("informe a nota 2 do aluno:")

leia(nota2)

escreval("informe a nota 3 do aluno:")

leia(nota3)

escreval("informe a medi dos exercicios do aluno:")

leia(me)

ma:=(nota1+nota2*2+nota3*3+me)/7

escreval("o numero do aluno e:",numero)

se (ma>=90)entao

   escreval("aprovado com o conceito A")

senao

   se((ma>=75)e(ma<90))entao

      escreval("aprobado com o conceito B")

   senao

      se  ((ma>=60)e(ma<75))entao

         escreval("aprovado com o conceito c")

      senao

         se((ma>=40)e(ma<60))entao

            escreval("aprovado com o conceito D")

         senao

            se(ma<40)entao

               escreval("aprovado com o conceito E")

fimse

fimse

fimse

fimse

fimse

            fimalgoritmo

---------------------------------------------------------------------------------------------------------------