Logica Da Programação

Questão 01:

algoritmo "Questão 01"

var

A,B,C: inteiro

inicio

A<-10

B<-20

escreva("O VALOR DE A=",A)

escreva("O VALOR DE B=",B)

escreva("TROCANDO VALORES...")

C<-A

A<-B

B<-C

escreva("O VALOR DE A=",A)

escreva("O VALOR DE B=",B)

fimalgoritmo

Questão 02:

algoritmo "Questão 02"

var

a,b,h: real

escreva("digite o valor da base do triangulo" )

leia(b)

escreva("agora digite o valor de sua altura")

leia(h)

a<-b*h

escreva(" a area do triangulo procurada é:" ,a)

fimalgoritmo

Questão 03:

algoritmo "Questao 03"

var

ano,mes,dias,idade: inteiro

meses: real

inicio

ano:=365

mes:=30

Escreva("Informe sua idade: ")

Leia (idade )

escreva (" sua idade corresponde à ")

dias:= (ano*idade) , " dias"

escreva(dias , " dias" )

fimalgoritmo

algoritmo "questao 04"

var

branco,nulo,valido,total:inteiro

porcbranco,porcnulo,porcvalido:real

inicio

escreval("Votos brancos: ")

leia(branco)

escreval("Votos nulos: ")

leia(nulo)

escreval("Votos válidos: ")

leia(valido)

total<-branco+valido+nulo

porcbranco<-(branco/total)*100

porcnulo<-(nulo/total)*100

porcvalido<-(valido/total)*100