Quote:
Originariamente inviato da hw85
scusami ho sbagliato ad impsotare la domanda, a me serve creare UN vettore di n elementi generati casualmente SOLO NON PRIMI !  |
'genera vettore casuale
Randomize timer
For i = 1 To n ' n= numero massimo di elementi
x(i) = Int(Rnd * n) + 1' creazione di un vettore con k elementi esimo di n
Next i
For j = 1 To n' n = il numero massimo di elementi
'x(j) esempio n = 6 x(0), x(1), x(2), x(3)... x(6)
'x(j) unico vettore creato da rnd interi di max 6 elementi
r = x(j) Mod j
if r=0 then
Print j, x(j), "non primo"
Else
Print j, x(j)
End If
Next j
ecco il code da inserire
ciao