Atividade prática Logica

Prévia do material em texto

Atividade prática Logica
 var 
celsius, far, celsius_inicial : real 
qt_temp, incremento,i:inteiro 
inicio 
// Seção de Comandos 
escreval("Informa a temperatura inicial em Graus Celsius:") 
leia(celsius_inicial) 
escreval("Informa a quantidade de temperaturas da tabela:") 
leia(qt_temp) 
escreval("Informe o incremento de temperatura em Graus Celsius") 
leia(incremento) 
celsius<-celsius_inicial 
para i de 1 ate qt_temp faca 
far<-9/5*celsius+32; 
celsius<-celsius+incremento 
escreva(i," - ") 
escreval("Celsius:",celsius) 
escreval("Farenheit:",far) 
escreval("") 
fimpara 
fimalgoritmo
var lado, area: real 
 inicio
 escreval("Digite o valor para um lado: ") 
leia(lado) 
 area<-lado*lado 
 escreval("Area do quadrado=",area) 
fimalgoritmo
1) PARA é um laço de repetição, é utilizado quando já se sabe quando o laço deve parar de repetir os comandos, pois seus parâmetros de entrada pedem tal condição de parada;
2)SE-ENTAO é um laço de condição, é imposta uma condição dentro do laço, caso essa condição for verdadeira, os comandos dentro dos laços são executados.
3)ENQUANTO é outro laço de repetição, porém, diferentemente do PARA, não devemos saber quando esse laço irá parar, portanto ele irá executar os comandos dentro dele enquanto os parâmetros passados forem verdadeiros.
4) FUNÇÕES são um conjunto de comandos que podem ser chamados em uma execução, elas normalmente contém comandos que são utilizados várias vezes durante uma execução e diferentemente de um método, sempre tem de retornar algum valor (verdadeiro, falso, 0, 1, isso depende do programador).
var i,j,k,n : inteiro 
v: vetor [1..50] de real 
vp: vetor [1..50] de real 
vn: vetor [1..50] de real 
aux: real 
 inicio 
escreval("Digite o número de elementos do vetor:") 
 leia(n) 
para i de 1 ate n faca 
escreval("Digite um numero qualquer:") 
 leia(v[i]) 
fimpara
k<-0 
 j<-0 
 para i de 1 ate n faca 
 se (v[i]>0) entao 
 k<-k+1 
 vp[k]<-v[i] 
 senao 
 j<-j+1 
 vn[j]<-v[i] 
 fimse 
 fimpara
escreval("Positivos:") 
 para i de 1 ate j faca 
 escreval(vp[i]) 
 fimpara 
 escreval("Negativos:") 
 para i de 1 ate k faca 
 escreval(vn[i]) 
 fimpara 
fimalgoritmo
algoritmo "estat" 
var 
x, idade,qt,fem_maior, fem_menor,masc_maior, masc_menor: inteiro 
sexo:caracter 
 
inicio 
// Seção de Comandos 
escreval("Digite a quantidade de entradas:") 
leia(qt) 
enquanto x < qt faca 
 
 escreva("Digite uma idade: ") 
 leia(idade) 
 escreva("Digite o sexo (f/m): ") 
 leia(sexo) 
 
 se (idade<18) e (sexo="f") entao 
 fem_menor<-fem_menor+1 
 fimse
se (idade<18) e (sexo="m") entao 
 masc_menor<-masc_menor+1 
 fimse 
 
 se (idade>=18) e (sexo="f") entao 
 fem_maior<-fem_maior+1 
 fimse 
 
 se (idade>=18) e (sexo="m") entao 
 masc_maior<-masc_maior+1 
 fimse
x<-x+1 
fimenquanto 
 
 escreval("*** Totais por faixa-etária e sexo ***") 
 escreval("Número de meninas: ",fem_menor) 
 escreval("Número de mulheres: ",fem_maior) 
 escreval("Número de meninos: ",masc_menor) 
 escreval("Número de homens: ",masc_maior) 
 escreval("Total geral:",qt) 
 
 escreval("% de meninas: ",fem_menor*100/qt," %") 
 escreval("% de mulheres: ",fem_maior*100/qt," %") 
 escreval("% de meninos: ",masc_menor*100/qt," %") 
 escreval("% de homens: ",masc_maior*100/qt," %") 
 
fimalgoritmo
Var
 // Seção de Declarações das variáveis
 matriz: vetor[1..10,1..10] de inteiro
 i, j, m, n: inteiro
Inicio
 // Seção de Comandos, procedimento, funções, operadores, etc...
 escreval("**Entrada de Dados**")
 escreval("")
 escreva("Digite o número de linhas e o número de colunas para matriz:")
 leia(m,n)
 para i de 1 ate m faca
 para j de 1 ate n faca
 escreva("Digite um valor para linha: ", i, "coluna", j,":")
 matriz[i,j]<- i+j
 fimpara
 fimpara
 limpatela
 escreval("**Resultados da matriz**")
 para i de 1 ate m faca
 para j de 1 ate n faca
 escreva(matriz[i,j])
 fimpara
 escreval("")
 fimpara
Fimalgoritmo