sábado, 28 de agosto de 2010

Inicio da Distribuição de Internet pelo Governo, órgão responsável PNBL

Abaixo encontra se a lista das 100 cidades pilotos a terem internet disponível pelo governo, essa empreitada será o marco para todos, poderemos dentro em breve pagar pela internet como pagamos hoje agua e luz, o que a tornará acessível a todos.


 100 primeiras cidades do PNBL: 

- Arapiraca (AL) 

- Messias (AL) 

- Palmeira dos Índios (AL) 

- Joaquim Gomes (AL) 

- Pilar (AL) 

- Rio Largo (AL) 

- Feira de Santana (BA) 

- Itabuna (BA) 

- Camaçari (BA) 

- Governador Mangabeira (BA) 

- Eunápolis (BA) 

- Governador Lomanto (BA) 

- Muritiba (BA) 

- Presidente Tancredo Neves (BA) 

- Sobral (CE) 

- São Conçalo do Amarante (CE) 

- Quixadá (CE) 

- Barreira (CE) 

- Maranguape (CE) 

- Russas (CE) 

- Cariacica (ES) 

- Domingos Martins (ES) 

- Conceição da Barra (ES) 

- Piúma (ES) 

- São Mateus (ES) 

- Vila Velha (ES) 

- Itapemirim (ES) 

- Anápolis (GO) 

- Aparecida de Goiânia (GO) 

- Trindade (GO) 

- Águas Lindas de Goiás (GO) 

- Alexânia (GO) 

- Itumbiara (GO) 

- Imperatriz (MA) 

- Paço do Lumiar (MA) 

- Presidente Dutra (MA) 

- Porto Franco (MA) 

- Grajaú (MA) 

- Barra do Corda (MA) 

- Barbacena (MG) 

- Juiz de Fora (MG) 

- Conselheiro Lafaiete (MG) 

- Ibirité (MG) 

- Sabará (MG) 

- Uberaba (MG) 

- Ribeirão das Neves (MG) 

- Santa Luzia (MG) 

- Campina Grande (PB) 

- Campo de Santana (PB) 

- Araruna (PB) 

- Riachão (PB) 

- Dona Inês (PB) 

- Bananeiras (PB) 

- Duas Estradas (PB) 

- Carpina (PE) 

- Tracunhaém (PE) 

- Nazaré da Mata (PE) 

- Paudalho (PE) 

- Limoeiro (PE) 

- Aliança (PE) 

- Piripiri (PI) 

- Campo Maior (PI) 

- José de Freitas (PI) 

- Piracuruca (PI) 

- Batalha (PI) 

- São João da Fronteira (PI) 

- Angra dos Reis (RJ) 

- Nova Iguaçu (RJ) 

- São Gonçalo (RJ) 

- Piraí (RJ) 

- Mesquita (RJ) 

- Rio das Flores (RJ) 

- Duque de Caxias (RJ) 

- Casimiro de Abreu (RJ) 

- Santa Cruz (RN) 

- Nova Cruz (RN) 

- Passa e Fica (RN) 

- Parnamirim (RN) 

- Lagoa d´Anta (RN) 

- Extremoz (RN) 

- Açú (RN) 

- Nossa Senhora da Glória (SE) 

- Barra dos Coqueiros (SE) 

- Laranjeiras (SE) 

- Japaratuba (SE) 

- São Cristóvão (SE) 

- Carira (SE) 

- Campinas (SP) 

- Guarulhos (SP) 

- Pedreira (SP) 

- Serrana (SP) 

- Conchal (SP) 

- Embu (SP) 

- São Carlos (SP) 

- Gurupi (TO) 

- Araguaína (TO) 

- Guaraí (TO) 

- Paraíso do Tocantins (TO) 

- Wanderlândia (TO) 

- Porto Nacional (TO)

quarta-feira, 25 de agosto de 2010

Salve salve amigos...

Olá a todos...

Vim dividir coisas novas que estou aprendendo, como todo mundo começa de algum lugar eu também, rumo ao conhecimento na área de desenvolvimento de software.

Abaixo um pequeno passo que dei, fiz um bloco de algoritmo em portugol aprendendo estrutura básica feito no VISUALG

Se testar vai ver que roda... até mais pessoal...

algoritmo "COMPOSIÇÃO CUSTO"
// Função : testar custo
// Autor : Erik Ignatowicz
// Data : 24/08/2010
// Seção de Declarações
var
QTD, VLR_UNIT, VLR_TOTAL, VLR_ICMS, VLR_IPI, VLR_FRETE, VLR_ICMS_FRETE ,VLR_CUSTO, VLR_CUSTO_UNITARIO: REAL
PERC_ICMS, PERC_IPI,PERC_ICMS_FRETE , COD_PROD : INTEIRO
DESC_PROD: CARACTER
inicio
// Seção de Comandos
ESCREVAL ("Informe código e descrição do produto")
         LEIA (COD_PROD)
         LEIA (DESC_PROD)
ESCREVAL ("Informe quantidade e valor unitário")
         LEIA (QTD)
         LEIA (VLR_UNIT)
ESCREVAL ("Informe aliquota de ICMS e IPI")
         LEIA (PERC_ICMS)
         LEIA (PERC_IPI)
ESCREVAL ("Informe valor de frete e alíquota ICMS")
         LEIA (VLR_FRETE)
         LEIA (PERC_ICMS_FRETE)
                        VLR_TOTAL <- (VLR_UNIT * QTD)
                        VLR_ICMS <- (VLR_TOTAL * PERC_ICMS /100)
                        VLR_IPI <- (VLR_TOTAL * PERC_IPI  /100)
                        VLR_ICMS_FRETE <- (VLR_FRETE * PERC_ICMS_FRETE /100)

                        VLR_CUSTO <- (VLR_TOTAL + VLR_IPI + VLR_FRETE)
                        VLR_CUSTO_UNITARIO <- (VLR_CUSTO / QTD)
ESCREVAL ("ABAIXO DEMONSTRAÇÃO DO CUSTO TOTAL E CUSTO UNITÁRIO DO ITEM")
ESCREVA ("Valor custo total é")
ESCREVAl (VLR_CUSTO)
ESCREVA ("Valor custo unitário total é")
ESCREVA (VLR_CUSTO_UNITARIO)
fimalgoritmo