domingo, 12 de setembro de 2010

terça-feira, 7 de setembro de 2010

catet,adja.

algoritmo "cateto adja."
// Função :
// Autor :
// Data : 7/9/2010
// Seção de Declarações
var
b1, b2, b3 : numerico
inicio
escreval ("cateto hipotenusa ")
leia (b1)
escreval ("cateto oposto ")
leia (b2)
b3 <- raizq(b1^2 - b2^2) ://valor do cateto adja.
escreval (" o valor da cateto adja. eh ", b3)
// Seção de Comandos
fimalgoritmo



Início da execução
cateto hipotenusa
67.082039
cateto oposto
30
o valor da cateto adja. eh 59.999999636646

Fim da execução.

cateto oposto

lgoritmo "cateto oposto"
// Função :
// Autor :
// Data : 7/9/2010
// Seção de Declarações
var
b1, b2, b3 : numerico
inicio
escreval ("cateto hipotenusa ")
leia (b1)
escreval ("cateto adja. ")
leia (b2)
b3 <- raizq(b1^2 - b2^2) ://valor do cateto oposto
escreval (" o valor da cateto oposto eh ", b3)
// Seção de Comandos
fimalgoritmo



Início da execução
cateto hipotenusa
67.082039
cateto adja.
60
o valor da cateto oposto eh 29.999999273292

Fim da execução.

fiz para encontrar a hipotenusa de um triangulo retangulo

algoritmo "hipotenusa de um triangulo"
// Função :
// Autor :Paulo gama
// Data : 7/9/2010
// Seção de Declarações
var
b1, b2, b3 : numerico
inicio
escreval ("cateto oposto ")
leia (b1)
escreval ("cateto adja. ")
leia (b2)
b3 <- raizq(b1^2 +b2^2) ://valor da hipotenusa
escreval (" o valor da hipoitenusa eh ", b3)
// Seção de Comandos
fimalgoritmo





Início da execução
cateto oposto
30
cateto adja.
60
o valor da hipoitenusa eh 67.0820393249937

Fim da execução.
algoritmo "hipotenusa de um triangulo"
// Função :
// Autor :Paulo gama
// Data : 7/9/2010
// Seção de Declarações
var
b1, b2, b3 : numerico
inicio
escreval ("cateto oposto ")
leia (b1)
escreval ("cateto adja. ")
leia (b2)
b3 <- raizq(b1^2 +b2^2) ://valor da hipotenusa
escreval (" o valor da hipoitenusa eh ", b3)
// Seção de Comandos
fimalgoritmo

teste

Início da execução
entre com o nome
Paulo Henrique gama
entre com as notas das tres provas
9.5
8.7
9
a media harmônica ponderada de Paulo Henrique gama é 8.97556561085973
Fim da execução.

teste

Início da execução
digite nota 1:8
digite nota 2:9
digite nota 3:6
a media eh ? 7.66666666666667
Fim da execução.


Início da execução
*****calculo de area******
qual e o valor da base?19
qual valor da altura?29
a area desse triangulo eh igual a 275.5******************fim*************
Fim da execução.

algoritmos

Exercícios: 2-1 ~ 2-20

2-1
1) Escreva as expressões abaixo na forma de sintaxe do Português Estruturado.

a) raizq(((2+x)*x+u)/(a+b+c))


b) x^2+(3*x^(x+1))/2+raizq(x+1)

c) h-((45/7*x)-4*h*(3+a))^3

d) (-b-(raizq((b^2-4)*a*c)))/(2*a)

e) -raizq((-6^x+2*y)/3^9)

f) raizq(6)+((x*y)/(2*x))+3^2-(x^2/3)

2-2
Escreva as expressões abaixo na forma convencional:

1. (12 + 1)/ (4*a/45)^0.5

2. (a + x^(2 + w) -3*a)/2

3. 12*x/(36 – 9^y) 4. (17^0.5 + 4)/3

2-3
Resolva a expressão aritmética abaixo montando todos os passos utilizados para a obtenção da solução: (20%7) + 7 – 3.0 + 7/2 + (19\5) + (20 + 4)/4*3


algoritmo "Calculando a expressão aritmética"

var

total : real

inicio

escreval ("Cálculo de Expressão Aritmética")

total <- (20%7) + 7 - 3.0 + 7/2 + (19/5) + (20+4)/(4 * 3)

escreva ("o valor da expressão e",total)

fimalgoritmo

2-4
Classifique os valores das constantes abaixo, de acordo com seu tipo, assinalando com N os dados numéricos e com L os literais:


1. ( ) 0

2. ( ) “abc”

3. ( ) “João”

4. ( ) “FALSO”

5. ( ) 1012

6. ( ) “V”

7. ( ) -49

8. ( ) +342

9. ( ) 569

10. ( ) “Zé”

11. ( ) 5. 7

12. ( )0.00001

13. ( ) 3.1415

14. ( )-545

15. ( )”444”

16. ( ) “1+2”

1.(L) 0
2.(L)"abc"
3.(L)"joão"
4.(L) "FALSO"
5.(N)1012 6.(L) "V"
7.(N)-49
8.(N)+342
9(N)569
10(L)"Ze"
11.(N)5. 7
12.(N)0.00001
13.(N)3.1415
14.(N)-545
15.(L)"444"
16.(L) "1+2"

2-5
Assinale com um X os nomes de variáveis válidos:
1. ( ) abc
2. ( )3abc
3. ( )a
4. ( )123ª

5. ( )-a
6. ( )acd1
7. ( )-_ad
8. ( )A&a
9. ( ) prim-nom
10. ( ) A123
11. ( )Aa
12. ( ) prim_nom
13. ( ) ABC DE
14. ( ) etc.
15. ( ) E
16. ( )”nome”

1.(X)abc
2.( )3abc
3.(X)a
4.( )123ª
5.( ) -a
6.(X)acd1
7.( )-_ad
8.( )A&a
9.(X) prim-nom
10.(X) A123
11.(X)Aa
12.(x) prim_nom
13.( ) ABC DE
14.( )etc.
15.(X) E
16.( )"nome"

2-6
Assinale com um X os comandos de atribuição considerados inválidos:


var

NOME, COR, TESTE, DIA, X : literal

SOMA, NUM: numérico

1. ( ) NOME <- 5
2. ( ) SOMA <- NUM + 2*X

3. ( )TESTE <- SOMA
4. ( ) NUM <- SOMA

5. ( ) COR <- “PRETO”
6. ( ) X <- X + “1”

7. ( ) NUM <- “ABC”
8. ( ) DIA<- “seGUNDA”

9. ( ) SOMA + 2 <- NUM
10. ( ) X <- (NOME = COR)

11. ( ) “ABC” <- NOME
12. ( ) NOME <- DIA + COR


1.(X) NOME <-5
2.(X) SOMA <- NUM + 2*X
3.( )TESTE <- SOMA
4.( ) NUM <- SOMA
5.( ) COR <- "PRETO"
6.(X) X <- X+"1"
7.(X) NUM <- "ABC"
8.( ) DIA <- "seGUNDA"
9.(X) SOMA +2 <- NUM
10.( ) X <-(NOME = COR)
11.(X)"ABC" <- NOME 12.(X) NOME <- DIA + COR

2-7
Escreva um algoritmo que calcule o valor de base . O algoritmo deve ler o valor da base e do expoente. Após, ele deve escrever o valor de base.


algoritmo "Calculando o valor da base"

var

base, expoente, total:real

inicio

escreval("Capítulo 2 - Exercício 7")

escreval

escreva("Informe o valor da base: ")

leia(base)

escreva("Informe o valor do expoente: ")

leia(expoente)

total <- base^expoente

escreva("Resultado: ", base, " elevado a ", expoente, " é ", total)

fimalgoritmo

2-8
No seguinte algoritmo existem erros de sintaxe? Em caso afirmativo, onde ?


01. altoritmo “Teste”

02. var

03. marca: literal

04. idade: numérico

05. letra: literal

06. marca : numérico

07. início

08. leia(idade)

09. escreva(idade)

10. idade = 678

11. leia(“letra”)

12. leia(ABC)

13. escreva (letra)

14. letra <- 4

15. fimalgoritmo



algoritmo "Teste"

var

marca: literal

idade: numérico //numerico é sem acento agudo na letra “e”

letra: literal

marca: numérico //Já existe uma variável com o nome 'marca'



início //Não tem acento na letra “i”

leia(idade)

escreva(idade)

idade = 678

leia(“letra”) //Não está atribuindo valor em nenhuma variável

leia(ABC) //Não existe a variável ABC

escreva (letra) //Letra não recebeu nada

letra <- 4 //Letra é do tipo literal, então não pode receber um valor inteiro

fimalgoritmo

2-9
Um representante comercial realizará uma viagem de vários dias com um automóvel, e, após, deseja saber a quilometragem média por litro de gasolina. Para isso, ele anotará a quilometragem no velocímetro ao sair de viagem e, depois, a quilometragem na chegada, ele também vai somar toda gasolina (em litros) usada para abastecer o carro durante a viagem. Escreva um algoritmo que, a partir desses dados, informe a quilometragem média por litro de gasolina.




algoritmo "Capítulo 2 - Exercício 9"

var

kmInicial, kmFinal, totalGasolina, mediaDiaria:real



inicio

escreval("Calculando média de gasolina em viagem")

escreval

escreva("Informe o KM Inicial: ")

leia(kmInicial)

escreva("Informe o KM Final: ")

leia(kmFinal)

escreva("Informe quantos litros de gasolina foram usados durante a viagem: ")

leia(totalGasolina)

mediaDiaria <- (kmFinal - kmInicial) / totalGasolina

escreva("Média diária percorrida pelo carro por litro de gasolina: ", mediaDiaria:5:1, "Km")


fimalgoritmo

2-10
Escreva um algoritmo que leia o nome de um piloto, uma distância percorrida em quilômetros e o


tempo que o piloto levou para percorrê-la (em minutos). O algoritmo deve calcular a velocidade em

km/h, e exibir a seguinte frase:

A velocidade média do foi km/h



algoritmo "Calcular a velocidade em km/h"

var

nome:literal

media,distancia:real

tempo:inteiro



inicio

escreval("Calculando a velocidade média em Km/h")

escreval

escreva("Entre com o nome do piloto:")

escreval

leia(nome)

escreva("Entre com a distância percorrida em km:")

leia(distancia)

escreva("Entre com o tempo gasto em minutos:")

leia(tempo)

media <- distancia /(tempo/60)

escreva("A velocide media do piloto ",nome," foi de",media," km/h")

fimalgoritmo

2-11
Em uma pizzaria, cada tulipa de chope custa R$ 2,80 e, uma pizza mista grande custa R$ 20.00 mais R$ 1.50 por tipo de cobertura pedida (queijo, presunto, banana, etc.). Uma turma vai à pizzaria e pede uma determinada quantidade de chopes e pizzas grandes com uma determinada quantidade de coberturas. Escreva um algoritmo que calcula a conta e, sabendo quantas pessoas estão à mesa, quanto cada uma deve pagar (não esqueça os 10% do garçom).






algoritmo "Calcular a conta da pizzaria"

var

pessoas, chopes, pizzas, coberturas:inteiro

subTotalConta, totalConta, Garcom, totalPorPessoa:real

inicio

escreval("Calculando o total da conta da Pizzaria")

escreval

escreva("Entre com o número de pessoas: ")

leia(pessoas)

escreva("Entre com a quantidade de chopes que foram pedidos: ")

leia(chopes)

escreva("Entre com a quantidade de pizzas que foram pedidas: ")

leia(pizzas)

escreva("Entre com a quantidade de coberturas que acompanharam as pizzas: ")

leia(coberturas)

subTotalConta <- (chopes * 2.80) + (pizzas * 20) + ( (coberturas * 1.50) * pizzas)

garcom <- (subTotalConta / 100) * 10



totalConta <- subTotalConta + garcom

totalPorPessoa <- totalConta / pessoas



escreval

escreval("Este é o Valor da Conta-------------: R$", subTotalConta:5:2)

escreval("10% do Garçom---------------------: R$", garcom:5:2)

escreval("Total da Conta + 10% Garçom------: R$", totalConta:5:2)

escreval("Total por pessoa---------------------: R$", totalPorPessoa:5:2)



fimalgoritmo

2-12
Escreva um algoritmo que calcule e escreva a soma Sn dos n primeiros termos de uma progressão aritmética dada pela formula:




sn = ((a1 + an) / 2) * n



Onde a1, é o primeiro termo da progressão, an, é o ultimo e n é o numero de termos, tal que: n = ((an – a1) / r) + 1



Os valores de a1, an e r (a razão da progressão) serão fornecidas pelo usuário.





algoritmo "Progressão Aritmética"

var

a1, an, r, sn, n:real



inicio

escreval("Calculando uma Progressão Aritmética")

escreva("Entre com o valor de a1: ")

leia(a1)

escreva("Entre com o valor de an: ")

leia(an)

escreva("Entre com o valor de r: ")

leia(r)

n <- ((an - a1)/r) + 1

sn <- ((a1 + an)/2) * n

escreval("O valor de Sn é: ", sn)



fimalgoritmo

2-13
Escreva um algoritmo que calcule e escreva o valor de um termo an qualquer de uma progressão geométrica dada por: an = a1 * q^(n-1) onde a1, é o primeiro termo da série, an, é o enésimo termo, q é a razão e n é o numero de termos. Os valores de a1, q e n serão fornecidos pelo usuário.




algoritmo " Progressão Geométrica "

var



a1, an, q, n:real



inicio

escreval("Calculando uma Progressão Geométrica")

escreval

escreva("Entre com o valor de A1: ")

leia(a1)

escreva("Entre com o valor de Q: ")

leia(q)

escreva("Entre com o valor de N: ")

leia(n)

an <- a1 * (q^(n-1))

escreval("Valor do termo An: ", an)



fimalgoritmo

2-14
...

2-15
Escreva um algoritmo que calcule e escreva o valor de um termo an qualquer de uma progressão geométrica dada por: an = a1 * q^(n-1) onde a1, é o primeiro termo da série, an, é o enésimo termo, q é a razão e n é o numero de termos. Os valores de a1, q e n serão fornecidos pelo usuário.




algoritmo " Progressão Geométrica "

var



a1, an, q, n:real



inicio

escreval("Calculando uma Progressão Geométrica")

escreval

escreva("Entre com o valor de A1: ")

leia(a1)

escreva("Entre com o valor de Q: ")

leia(q)

escreva("Entre com o valor de N: ")

leia(n)

an <- a1 * (q^(n-1))

escreval("Valor do termo An: ", an)



fimalgoritmo

2-16
Escreva um algoritmo que leia um valor composto apenas de 0’s e 1’s representando um número na base binária (com até 6 dígitos ou bits). O algoritmo deve escrever esse mesmo número na base decimal. A conversão de binário para decimal é feita somando–se os produtos de cada dígito do número binário, por seu peso, sendo que o digito mais à direita tem peso 1 (2°), o seguinte tem peso 2 (2¹), 4 (2²), 8 (2³), etc.


Por exemplo 110101 é 53 .(1×32 + 1x 16 + 0×8 + 1×4 + 0x 2 + 1×1 = 32 + 16 + 0 + 4 + 0 + 1 = 53)



algoritmo "Conversão de Binário para Decimal"



var

n1, n2, n3, n4, n5, n6, decimal:numerico



inicio

escreva("Entre com o 1ºBit (0 ou 1)")

escreval

leia(n1)

escreva("Entre com o 2ºBit (0 ou 1)")

escreval

leia(n2)

escreva("Entre com o 3ºBit (0 ou 1)")

escreval

leia(n3)

escreva("IEntre com o 4ºBit (0 ou 1)")

escreval

leia(n4)

escreva("Entre com o 5ºBit (0 ou 1)")

escreval

leia(n5)

escreva("Entre com o 6ºBit (0 ou 1)")

escreval

leia(n6)

decimal <- (n1*32 + n2*16 + n3*8 + n4*4 + n5*2 + n6*1)

escreva("Decimal: ",decimal)



fimalgoritmo

2-17
...

2-18
Uma revenda de carros paga a seus vendedores um salário de X reais por mês, acrescido de uma comissão de y reais para cada carro vendido e 4% do valor total de vendas. Escreva um algoritmo que leia o nome do vendedor, seu salário, número de carros que ele vendeu no mês e o valor total de suas vendas. O algoritmo deve escrever o nome e o salário final do vendedor.




algoritmo "Calcular sálario final de um vendedor"

var

nome:literal

salFixo,valorCarrosVendidos,comissaoPorCarro,salLiquido:real

qtdeCarrosVendidos:inteiro



inicio

escreval("Entre com o nome do Vendedor:")

leia(nome)

escreval("Entre com o salário fixo do Vendedor:")

leia(salFixo)

escreval("Entre com a comissão por cada carro vendido:")

leia(comissaoPorCarro)

escreval("Entre com a quantidade de carros vendidos:")

leia(qtdeCarrosVendidos)

escreval("Entre com o total das suas vendas:")

leia(valorCarrosVendidos)

salLiquido<- salFixo+(comissaoPorCarro*qtdeCarrosVendidos)+(valorCarrosVendidos*0.04)

escreva("O salário líquido do vendedor ",nome," é de R$: ",salLiquido:5:2)



fimalgoritmo

2-19
O custo final de um carro é a soma do custo de fábrica com o percentual de revenda mais impostos, ambos aplicados ao custo de fábrica. Escreva um algoritmo que leia o nome do modelo de um carro, seu custo de fábrica e os percentuais de revenda e de impostos e escreva o custo ao consumidor do carro.




algoritmo "Calculando valor final de um veículo para o consumidor"

var

nomeModelo:literal

custoFabri, percentualRevenda, impostos, valorFinal:real



inicio

escreva("Entre com o nome do Modelo do carro: ")

leia(nomeModelo)

escreva("Entre com o valor de fabrica do veículo: ")

leia(custoFabri)

escreva("Entre com o percentual da revenda: ")

leia(percentualRevenda)

escreva("Entre com o percentual dos impostos: ")

leia(impostos)

valorFinal <- custoFabri + (custoFabri * (percentualRevenda / 100)) + (custoFabri * (impostos / 100))

escreva("O Valor final do carro ", nomeModelo, " para o consumidor é de ", valorFinal:6:2)

fimalgoritmo


2-20
Escreva um algoritmo que leia o nome, o valor da hora e o número de horas trabalhadas por um empregado. O algoritmo deve escrever o nome e o salário liquido do empregado calculado conforme as seguintes regras:


1. O salário bruto mensal é o produto das horas trabalhadas pelo valor das horas.

2. Sobre o salário bruto mensal é aplicado um desconto de 9% referente ao INSS e 8% de FGTS;

3. O salário liquido é o salário bruto mensal menos os encargos.



algoritmo "Cálculo jornada de trabalho"



var

nome:literal

valorHora, totalHoras, salarioBruto, encargos, salarioLiquido:real



inicio

escreva("Entre com o nome do empregado: ")

leia(nome)

escreva("Entre com o valor da hora trabalhada: ")

leia(valorHora)

escreva("Entre com o total de horas trabalhadas: ")

leia(totalHoras)

salarioBruto <- totalHoras * valorHora

encargos <- (salarioBruto * (9/100)) + (salarioBruto * (8/100))

salarioLiquido <- salarioBruto - encargos

escreva("O empregado ", nome, " receberá o salário de: R$", salarioLiquido:5:2)

fimalgoritmo


1ª LISTA/EXERCICIOS
_______________________________________________________________________________

Faça um algoritmo que calcule a área de um triângulo que recebe a base e a altura e retorna a área.


algoritmo "Calcular Área de um Triangulo"



var

h, b:real

inicio

escreval("Calculo da Área de um Triangulo")

escreva("Entre com o valor da base?")

leia(b)

escreva("Entre com o valor da altura?")

leia(h)

escreva("Área do Triângulo: ", (b*h)/2)



fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que receba apenas 1 lado do triângulo equilátero e retorne a área.


algoritmo "Calcular Área de um Triângulo Equilatero"



var

lado, h, area:real

inicio

escreval("Calcular Área de um Triângulo Equilatero")

escreva("Qual e o valor de um lado?")

leia(lado)

h<-(lado*raizq(3))/2

area<-(lado*h)/2

escreva("Area de triangulo: ", area:5:2)



fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que solicite o peso de gatos e o peso em Kg do pacote de ração, onde deverá se calcular as porções diárias e mostrar o quanto em gramas existe no pacote de ração após 5 dias.


algoritmo "Calcular Porções de Ração Diária de Gatos"



var

racao,g1,g2,gramasg1,gramasg2,pdiaria,p5dias,soma:real



inicio

escreval("Calcular Porções de Ração Diária de Gatos")

escreval

escreva("Qual é o peso do Gato 1? ")

leia(g1)

escreva("Qual é o peso do Gato 2? ")

leia(g2)

escreva("Qual é o peso do Pacote de Ração? ")

leia(racao)

gramasg1 <- g1 * 50

gramasg2 <- g2 * 50

pdiaria <- gramasg1 + gramasg2

p5dias <- (racao * 1000) - (pdiaria * 5)

escreva("Total de ração após 5 dias: ", p5dias, " gramas")



fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que tendo como dados de entrada dois pontos quaisquer no plano P(X1*Y1) e P(X2*Y2). Escreva a distância entre eles.


algoritmo "Distância entre dois pontos"



var

x1,x2,y1,y2,d:real



inicio

escreval("Calcular distância entre pontos")

escreval

escreva("Entre com o valor de X1? ")

leia(x1)

escreva("Entre com o valor de X2? ")

leia(x2)

escreva("Entre com o valor de Y1? ")

leia(y1)

escreva("Entre com o valor de Y2? ")

leia(y2)

d <- raizq( ((x2-x1)^2) + ((y2-y1)^2) )

escreva("Distância entre os pontos: ", d:5:2)



fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que tendo como dados de entrada dois pontos quaisquer no plano P(X1*Y1) e P(X2*Y2). Escreva a distância entre eles.


algoritmo "Distância entre dois pontos"



var

x1,x2,y1,y2,d:real



inicio

escreval("Calcular distância entre pontos")

escreval

escreva("Entre com o valor de X1? ")

leia(x1)

escreva("Entre com o valor de X2? ")

leia(x2)

escreva("Entre com o valor de Y1? ")

leia(y1)

escreva("Entre com o valor de Y2? ")

leia(y2)

d <- raizq( ((x2-x1)^2) + ((y2-y1)^2) )

escreva("Distância entre os pontos: ", d:5:2)



fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que leia a idade de uma pessoa expressa em dias, meses e anos e mostre a expressa em dias.


algoritmo "Idade de uma pessoa"



var

dias, meses, anos, total:inteiro

inicio

escreval("Cálculo da Idade de uma Pessoa em dias")

escreval

escreval("Entre com o dia em que a pessoa nasceu: ")

leia(dias)

escreval("Entre com o mês do nascimento da pessoa: ")

leia(meses)

escreval("Entre com o ano do nascimento da pessoa: ")

leia(anos)

total<-(anos*365)+(meses*30)+dias

escreva("O total de dias é: ", total)



fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que leia a idade de uma pessoa expressa em dias e mostre a expressa em anos.


algoritmo "Idade de uma pessoa"



var

dias, meses, anos, total, sobra:inteiro

inicio

escreval("Cálculo da Idade de uma Pessoa")

escreval

escreval("Entre com a Idade em dias: ")

leia(total)

anos<-total-(anos*365)

meses<-sobra div 30

dias<-sobra-(meses*30)

escreva("IDADE:",anos," ano(s) e",meses," mês(s) e",dias," dia(s)")

fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que leia a idade de uma pessoa expressa em dias e mostre a expressa em anos.


algoritmo "Idade de uma pessoa"



var

dias, meses, anos, total, sobra:inteiro

inicio

escreval("Cálculo da Idade de uma Pessoa")

escreval

escreval("Entre com a Idade em dias: ")

leia(total)

anos<-total-(anos*365)

meses<-sobra div 30

dias<-sobra-(meses*30)

escreva("IDADE:",anos," ano(s) e",meses," mês(s) e",dias," dia(s)")

fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que leia o tempo de duração de um evento em uma fábrica expressa em segundos e mostre-o expresso em Horas, Minutos e Segundos


algoritmo "Tempo de Duração de um Evento em uma Fábrica"



var

seg, min, horas:inteiro



inicio

escreval("Tempo de Duração de um Evento em uma Fábrica")

escreval

escreval("Entre com o Tempo em segundos: ")

leia(seg)

horas<-seg div 3600

min<-(seg-(horas*3600)) div 60

seg<-(seg-(horas*3600)-(min*60))

escreva(horas," Horas,",min," Minutos e",seg, " Segundos")



fimalgoritmo
_________________________________________________________________________________
Faça um algoritmo que receba a altura de uma pessoa e informe o seu peso ideal - IMC


algoritmo "Cálculo de Peso Ideal - IMC"

var

altura:inteiro

pesoIdeal:real



inicio

escreval("Cálculo de Peso Ideal - IMC")

escreval

escreva("Entre com sua altura sem ponto e sem vírgula: ")

leia(altura)



pesoIdeal<-(25*(altura^2))/10000



escreva("O seu Peso Ideal é: ", pesoIdeal:5:2)



fimalgoritmo

segunda-feira, 16 de agosto de 2010

12. Quais as características do primeiro computador eletromecânico?
13. Quais eram as características básicas da arquitetura proposta por John von Neumann?
14. O que significava a seguinte expressão: “O computador processaria os dados de acordo com as necessidades do usuário”?
15. Por que foram criadas as linguagens de programação?
16. O que foi o Memex?
17. O que marcou o início da "Era do Computador?
18. Qual foi o primeiro computador comercializado?
19. Qual a diferença entre linguagem de alto nível e linguagem de máquina?
20. O código ASCII foi criado em 1963,para que ele era utilizado?
21. Quais as antecessoras da Internet?
22. Quais as características do Apple II?
23. Em 1981 a IBM introduziu o PC no mercado, qual o software básico deste PC?
24. Em 1990 a Microsoft teve um lançamento de impacto,qual?
25. O Que quer dizer WWW? E HTML?
26. O que é um sistema de Computação?
27. Quais os componentes de um sistema de computação?
28. Como podem ser classificados os computadores quanto à característica de construção, quanto ao princípio de construção (natureza), quanto ao âmbito e quanto ao porte? Descreva as características de cada uma das categorias.
29. Quais são, na sua opinião, as razões pelas quais a revolução dos computadores progrediu tanto em tempo tão curto?
30. Para onde você acha que caminha o futuro dos computadores? Quais os fatores que você levou em consideração para formar a sua opinião?

12) Foi o Mark I, era constituído por 7milhões de peças móveis e sua fiação alcançava 800 Km.
13) As caracteristicas são as seguintes: os programas eram armazenados na memoria, assim como os dados e as tarefas de controle e operações aritimetica eram feitas separadamente.
14)Essa afirmação quer dizer que os computadores fariam o que os usuarios os programassem para fazer.
15)As linguagens de programação foram criadas para melhor uso dos recursos de hardware, assim como para o desenvolvimento de programas (softwares).
16)Foi uma maquina criada para armazenar dados.
17)Podemos dizer que o que marcou o inicio da era do computador foi a difusão de seu desenvolvimento, uso e estudo alem do meio militar, em universidades e em empresas.
18)Foi o Univac.
19) A de alto nível é aquela linguagem visualizada e entendida pelo usuário final, ou seja, a linguagem que está por trás dos softwares, e a de máquina é aquele que se comunica diretamente com o hardware.
20) Era um código numérico usado para representar os caracteres, entendido por quase todos os computadores, impressoras e programas de edição de texto. 27.
21) A ARPANET foi a antecessora da INTERNET.
22) Foi o primeiro computador comercializado com o conceito de PC, direcionado para as massas, e não apenas para engenheiros e hobistas.
23) IBM Cassette BASIC e PC-DOS
24) Em 1990 a Microsoft apresenta o Windows 3.0 para computadores pessoais e o OS/2 desenvolvido com a IBM para estações de trabalho.
25) WORLD WIDE WEB e HyperText Markup Language
26) Sistema de computação nada mais é do que um computador.
27) Seus componentes são, placa mãe, memoria principal, disco rigido e dispositivos de entrada e saida.
28) Existem os de grande porte, mainframes, médio porte, minicomputadores e pequeno porte microcomputadores, divididos em duas categorias: os de mesa (desktops) e os portáteis (notebooks e handhelds).
29) Grandes investimentos e consequentemente pesquisas de desenvolvimento na area.
30) Nanotecnologia e integração total com serviços da WEB juntamente com o SO e seus aplicativos. Isso já esta acontecendo.

1. O que você entende por Computação?
R:Computação se resume como sendo a entrada de dados no computador, o processamento desses dados e o resultado final que seria gerado pelo processamento dessas informações.

2. O que é um computador? Ilustre aplicações nas quais o uso do computador se torne necessário.
R: É uma maquina constituida por uma série de componetes e circuito eletronicos capaz de receber, armazenar processar e trasnsmitir informações

EX: maquina programavel, capaz de realizar uma grande quantidade de tarefas, seguindo uma sequencia de comandos,
De acordo com o que for especificado, o computador não faz absolutamente nada sem que lhe seja ordenado a fazer.

3. Descreva, em linhas gerais, os termos a seguir e dê um exemplo de objeto ou dispositivo associado a cada um deles:
a) Processamento R:É o conjunto de informações gerenciado pelo processador.
b) Entrada R:Dispositivo de entrada são os periféricos como mause, teclado caixa de som e monitor.
c) Saída R:Impressora, caixa de som etc
d) Armazenamento R:HD , Diskete, Fita magnetica e Drive de dvd


4. Qual foi a primeira máquina capaz de realizar cálculos?
R: 1642 - Primeiro instrumento moderno de calcular – uma somadora (Máquina de Pascal) – construído por Blaise Pascal (físico, matemático e filósofo francês).
5. O que caracterizou “A loucura de Babbage”?

R: A máquina de Babbage não chegou a ser construída: ele não dispunha de recursos para financiá-la, nem encontrou investidores dispostos a ir além de algumas doações.
Grace Brewster Murray a mãe do COBOL, nasceu em 9 de dezembro de 1906 em Nova York, graduada em Matemática e Física ela terminou seu doutorado em 1934. Casou com Vincent Foster Hopper, um educador e em 1930 começou a ensinar matemática.
Ela programou a Mark I e descreveu os princípios fundamentais de funcionamento da computação das máquinas. Até o final da II Guerra Mundial em 1945, Hopper estava trabalhando no Mark II.

6. O que representam Ada Byron King e Grace Murray Hopper na evolução da computação?

R: Ada é uma das poucas mulheres a figurar na história do processamento de dados. Criou programas para a máquina primeira programadora de computador do mundo.


7. Como eram os primeiros computadores?
R: Eles eram enormes e necessitavam de varias pessoas para programar, normalmente o trabalho era manual e dificil e somente grandes empresas podiam te-los por ter um preço muito elevado, eles tabem davam muito problemas porque aqueciam demais e com o tempo foram se modernizando, se aperfeiçoando foram ficando menores mais velozes e mais acessiveis as empresas mais pequenas, e as classes mais baixas da população.
8. Quem criou o primeiro computador mecânico? Como ele era fabricado? Como ele funcionava?

Para muitos pesquisadores foi Charles Babbage,em 1822.
Não chegou a ser construida,faltou verba p/ o cidadão, e não encontrou
Investidores para apoiar o seu projeto
Funcionaria assim: ela teria capacidade para ler dados de entrada, armazenar esses dados, fazer calcúlos, gerar dados de saida e automaticamente controlar a operaçaõ da maquina.

9. Qual o grande feito do Inglês George Boole?

Foi criar a Álgebra Booleana, base da atual aritmética computacional, ele era um matematico e filósofo britânico.


10. O que representou Alan Turing para a computação?

Em 1943, a inglaterra junto com Alan, constroi um equipamento eletronico digital (colossus I) , utilizado para decifrar codigos militares alemão

11. O que caracterizava o Teste de Turing?

O Teste de Turing é um teste proposto por Alan Turing em uma publicação de 1950 chamada "Computing Machinery and Intelligence" cujo objetivo era determinar se um programa de computador é ou não inteligente. O programa é inteligente se a pessoa que participa no teste não for capaz de dizer se foi o programa ou um ser humano que respondeu às suas perguntas.

quarta-feira, 11 de agosto de 2010





Nada é por acaso, nem mesmo o acaso foi sempre casual, e há casos de acasos casuais, td faz parte do acaso casual dos nossos dias

Um poema para jovens enamorados:

Quando a brisa fresca , tocar seu corpo ardente , my dear, ... coloque uma blusa
para não ficar doente. pois não quero te ver assim, com o cherador pingando, com os
olhos lagrimejando, enfim vc é td p/ mim, como um amor sem fim..
Vá poema aventureiro, vá por meio da favela, mas corre, corre bem depressa, e va dizer ao meu
amor que talvez ela se livre dessa.

Bilau XXIII

terça-feira, 27 de abril de 2010

Nem tudo está perdido....

pois.. talvez o ir, não esteja nunca no indo e sempre no não fui, vinha vindo, não cheguei, não chegaria pois não era o caminho , caminho esse, caminho aquele, qual seguir, de qual desistir.
Voltaria, se tivesse a volta que se perdeu no meio do errado caminho, mas tem o destino algo maior, um caminho que muda, conforme se muda, ao seguir o bom caminho..




um bom dia .