Questo topic e' stato chiuso dal moderatore.
25/06/09 9:20
Salve,
scusate se vi rompo ancora, ma come posso fare per determinare se un determinato numero è un numero primo?
Grazie anticipatamente!
25/06/09 10:49
manvb.net
Ponendo che il numero sia n:
fai un for che va da 2 a sqrt(n) 'sqrt(n) = Radice quadrata di n
controlli che n sia divisibile per il numero corrente
se lo è non è un numero primo
Per controllare la divisibilità puoi fare:
if (n mod numero_corrente) = 0 then
aaa
25/06/09 11:36
manvb.net
Io to ho dato l'algoritmo non è che ci voleva tanto a trasformarlo in codice:
dim n as integer = 11 'Numero di cui vuoi verificare la primalità
dim i as integer = 0 'Variabile contatore
dim primo as boolean = true 'Variabile che conterrà il risultato
For i = 2 to cint(Math.Sqrt(n))
if (n mod i) = 0 then
primo = false
exit for
end if
next
Ora in primo hai true se è primo altrimenti false
Ultima modifica effettuata da manvb.net 25/06/09 11:38
aaa