diogobruno

Bom, sou técnico em informática e curso Bacharelado em SI(4ºP), e por experiência própria e como o senso comum nos diz, o curso técnico é bem inferior a um Bacharelado e Tecnologo, até mesmo por não poder ser comparado a um nível superior por se tratar de nivel médio, certo? Quanto a Bacharelado SI X Tecnologo SI, parece que o MEC tomou a sábia decisão de extinguir o curso de Tecnologo em SI. Não acho cabível em 2 ou 3 anos o cara sair com praticamente o mesmo título que eu, seria como haver um tecnologo em Medicina ou Engenharia. Mas por outro lado, recomendo Tecnologo a pessoas que já trabalham com informática, e precisam se reciclar de forma rápida, aí sim o tecnolgo tem a vantagem sobre o bacharelado. Sendo sincero.. se o cara é bom, o que importa é o que ele consegue fazer! []'s

Bom, não li o tópico inteiro, mas recomendo aqui os seguintes livros que adquiri há alguns dias. Java: Como Programar 6a Edição.. esse dispensa comentários, pra mim, é o melhor livro introdutório de linguagem Java Core J2Me - Sobre programação MidP Java, é muito bom, explica desde os minimos conceitos da arquitetura J2Me, livro bem detalhado e bem ilustrado, é essencial pra quem pensa em iniciar em programação de dispositivos portáteis Use a Cabeça! Jsp & Servlets - Como qualquer outro da série, tem um clima bem agravel para quem não conhece muito sobre Jsp e Servlets, e pra quem conhece um pouco e ainda não domina, é também uma boa referencia E óbvio, o melhor livro de Java é o JavaDoc & Java Tutorial

taí Var renavam : string; soma, digito : integer; valor, verificador : integer; i, j : integer; begin j := 1; soma := 0; renavam := edt_renavam.Text; For i := 5 downto 2 do begin soma := soma + (StrToInt(renavam[j]) * i); j := j + 1; end; valor := soma mod 11; digito:= StrToInt(renavam[6]); if((valor <= 1) or (valor >= 10)) then verificador := 0 else verificador := valor; If (digito = verificador) then showmessage ('Renavam nº '+ renavam+ ' Valido!!!') else showmessage ('Renavam nº '+ renavam+ ' invalido!!!');

Em VB eu Consegui com o seguinte código.. se precisar implementar em outra linguagem só pidir, ou se tiver alguma duvida quando a logica também Dim Renavam As String Dim Numeros(5) As String Dim I, J As Integer Dim Soma, Valor As Single Dim Digito As Integer J = 0 Renavam = txt_renavam.Text Renavam = Replace(Renavam, "-", "") For I = 1 To 5 Numeros(I - 1) = Mid(Renavam, I, 1) Next For I = 5 To 2 Step -1 Soma = Soma + (Numeros(J) * I) J = J + 1 Next Valor = Soma Mod 11 If ((Valor = 1) Or (Valor = 0) Or (Valor >= 10)) Then Digito = 0 Else Digito = Valor End If Label2.Caption = Digito & " " & Numeros(4) & " " & Soma & " " & Digito If (Digito = Numeros(4)) Then MsgBox ("Renavam nº " & Renavam & " Valido!") Else MsgBox ("Renavam nº " & Renavam & " Invalido!") End If

Nunca vi um numero desse =p mas qual a regra da validação?