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