Cai 8% o número de analfabetos entre dez e 24 anos
Dados educacionais medidos pela Pesquisa Nacional por Amostra de Domicílios (IBGE/2008) revelam que o número de analfabetos entre dez e 24 anos caiu 8% entre 2007 e 2008. A queda mais expressiva, de quase 10%, ocorreu no número de analfabetos entre crianças e adolescentes de dez a 14 anos. Os resultados foram apresentados nesta sexta-feira, 18, em Brasília, pelo Ministro da Educação, Fernando Haddad.
Em 2007, a taxa de analfabetos entre dez e 24 anos era 2,5%. O número caiu 0,2 ponto percentual em 2008 - para 2,3% -, o que representa queda na taxa de analfabetismo de 8%.
O percentual de crianças e adolescentes analfabetos, entre dez e 14 anos, era de 3,1% em 2007 e passou para 2,8% em 2008. Os resultados mostram queda de 0,3 ponto percentual ou próxima a 10%.
A taxa de analfabetismo se estabilizou para a faixa de 15 a 17 anos e entre 18 e 24 anos. No primeiro grupo, permaneceu em 1,7%. Entre 18 e 24 anos, a taxa de analfabetismo ficou estável em 2,2%.
Já o número absoluto de analfabetos na faixa de 25 anos ou mais subiu 1%, fazendo a taxa de analfabetos nessa faixa etária ficar em 10%. “O que não é crível porque, se está caindo o número de analfabetos de 10 a 24 anos, até por razões demográficas, era de se supor que o número tivesse caído, mas o numero absoluto aumentou em 140 mil, concentrado na região Sudeste - 100 mil dos 140 mil”, disse o ministro Fernando Haddad. Os outros 40 mil estão na região Sul.
De acordo com o ministro, o MEC está em contato com os técnicos do IBGE para saber se houve mudança no plano amostral ou na metodologia da pesquisa, a fim de compreender o aumento de 140 mil analfabetos com mais de 24 anos. “Não é razoável imaginar que pessoas que tenham se declarado alfabetizadas em 2007 tenham se tornado analfabetas em 2008, porque estamos falando do mesmo grupo amostral”, enfatizou.
Segundo o ministro, onde o programa Brasil Alfabetizado atua, a taxa de analfabetos entre pessoas com 25 anos ou mais caiu quase 1 ponto percentual – 0,9%. “Onde está instalado, (o programa) está funcionando adequadamente. O foco do programa está no Nordeste porque os governos locais aderiram com mais força”. De acordo com o ministro, o programa está aberto a todos, mas por decisão dos gestores locais, 80% das turmas estão no Nordeste.
" & vbCrLf 'Response.Write strReferringPage & "
" & vbCrLf ' Read in and set the initial values of our message parameters strFromName = Trim(Request.Form("txtFromName")) strFromEmail = Trim(Request.Form("txtFromEmail")) strToEmail = Trim(Request.Form("txtToEmail")) strSubject = "www.contee.org.br" strBody = Trim(Request.Form("txtMessage")) ' I set the body message to a message that referenced the page the ' user arrived from. This makes it great if you place a link to it ' from your different articles, but can be weird if people link in ' from other web sites. If strBody = "" Then If strReferringPage = "" Or InStr(1, strReferringPage, "www.contee.org.br", 1) = 0 Then strBody = "" strBody = strBody & "O link abaixo é uma sugestão de leitura: Cai 8% o número de analfabetos entre dez e 24 anos" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/educacao/nedu1295.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: Cai 8% o número de analfabetos entre dez e 24 anos" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: Cai 8% o número de analfabetos entre dez e 24 anos" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/educacao/nedu1295.asp" & vbCrLf End If End If ' Quick validation just to make sure our parameters are somewhat valid bValidInput = True bValidInput = bValidInput And strFromName <> "" bValidInput = bValidInput And IsValidEmail(strFromEmail) bValidInput = bValidInput And IsValidEmail(strToEmail) ' If valid send email and show thanks, o/w show form If bValidInput Then ' Set up our email object and send the message Set objCDONTS = Server.CreateObject("CDONTS.NewMail") objCDONTS.From = strFromName & " <" & strFromEmail & ">" objCDONTS.To = strToEmail objCDONTS.Subject = strSubject objCDONTS.Body = strBody objCDONTS.Send Set objCDONTS = Nothing ' Show our thank you message ShowThanksMsg Else If "http://" & Request.ServerVariables("HTTP_HOST") & strThisPage = strReferringPage Then Response.Write "Foi encontrado erro no preenchimento. Por favor confira os dados:" & "
" & vbCrLf End If ' Show our information retrieval form ShowReferralForm strThisPage, strFromName, strFromEmail, strToEmail, strBody End If ' End of page logic... subs and functions follow! %> <% ' Subroutines and Functions that encapsulate some functionality ' and make the above code easier to write... and read. ' A quick email syntax checker. It's not perfect, ' but it's quick and easy and will catch most of ' the bad addresses than people type in. Function IsValidEmail(strEmail) Dim bIsValid bIsValid = True If Len(strEmail) < 5 Then bIsValid = False Else If Instr(1, strEmail, " ") <> 0 Then bIsValid = False Else If InStr(1, strEmail, "@", 1) < 2 Then bIsValid = False Else If InStrRev(strEmail, ".") < InStr(1, strEmail, "@", 1) + 2 Then bIsValid = False End If End If End If End If IsValidEmail = bIsValid End Function ' I made this a function just to get it out of the ' logic and make it easier to read. It just shows the ' form that asks for the input Sub ShowReferralForm(strPageName, strFromName, strFromEmail, strToEmail, strBody) ' I use script_name so users can rename this script witout having to change the code. %> <% '
The Message to be sent:
'Subject: < %= strSubject % >
'Body: < %= strBody % >
End Sub ' This just shows our thank you message... probably didn't need to ' be a function, but since I made the form one I figured I'd do this ' for consistency. Sub ShowThanksMsg() %>Sua mensagem foi enviada com sucesso. <% End Sub %>