USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Dicas

  Visual Basic    (ActiveX/Controles/DLL)

Título da Dica:  Verficar se um nº é primo em T-SQL
Postada em 5/4/2006 por Marco de A. F.      Clique aqui para enviar email para o autor  marco_mw@hotmail.com
DECLARE @DIV AS INTEGER
     DECLARE @CONT AS INTEGER
     DECLARE @NUM AS INTEGER
     
     SET @NUM = 131 --É O Nº A SER TESTADO, SUBSTITUA-O      
     
     SET @DIV = 1
     SET @CONT = 0

     WHILE @DIV <= @NUM
     BEGIN
          IF @NUM % @DIV = 0
               SET @CONT = @CONT + 1

          SET @DIV = @DIV + 1
     END

     IF @CONT = 2
          PRINT 'É PRIMO'
     ELSE
          PRINT 'NÃO É PRIMO'
 


CyberWEB Network Ltda.    © Copyright 2000-2021   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página