Ir ao conteúdo
  • Cadastre-se

diogobruno

Membro Pleno
  • Posts

    116
  • Cadastrado em

  • Última visita

posts postados por diogobruno

  1. 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

  2. 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

  3. 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!!!');

  4. 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 :-BEER

    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

     

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...

Ebook grátis: Aprenda a ler resistores e capacitores!

EBOOK GRÁTIS!

CLIQUE AQUI E BAIXE AGORA MESMO!