[Contest] Numeri primi tramite Crivello di Erastotene

#include <iostream>
#include <cstdlib>

using namespace std;

int main(int argc, char *argv[])
{
       int n = 30;
       cout << "Mostra i numeri primi da 2 fino a ...";
       cin >> n;
       cout << endl;

       int *setaccio = (int*) malloc(sizeof(int) * (n - 2));
       int *numeriPrimi = (int*) malloc(sizeof(int) * (n - 2));

       for (int i = 2; i <= n; i++)
       {
               *(setaccio + (i-2)) = i;
       }

       int indexDivisore = 0;
       while (1)
       {
               int divisore = *(setaccio+(indexDivisore++));
               if (divisore*divisore > n) break;

               int indexnumeriPrimi = 0;
               for (int i = 0; i < n-1; i++)
               {
                       if (*(setaccio+i) % divisore == 0)
                       {
                               continue;
                       }
                       *(numeriPrimi+(indexnumeriPrimi++)) = *(setaccio+i);
               }

               memcpy(setaccio, numeriPrimi, sizeof(int) * (n-2));
               memset(numeriPrimi, 0, sizeof(int) * (n-2));
       }

       for (int i = 0; *(setaccio+i) >= 0; i++)
       {
               cout << *(setaccio+i) << endl;
       }
       
       getchar(); // \n del cin
       getchar();

       return 0;
}

;badpr0g

Global $n = 30, $setaccio[$n], $v = 0, $del

For $i = 2 To $n
 
  $setaccio[$i - 2] = $i
 
Next

Do
 
  del_multiple()
 
Until ($del * $del) > $n

For $i = 0 To $n - 2
 
  If $setaccio[$i] <> 0 Then ConsoleWrite($setaccio[$i] & @TAB)
         
Next          

Func del_multiple()

  For $i = (0 + $v) To $n - 2

         $del = $setaccio[$v]

         If $setaccio[$i] <> $del And IsInt($setaccio[$i] / $del) Then
               
                $setaccio[$i] = 0
               
         EndIf
         
  Next
 
  $v += 1
 
EndFunc