[ESERCIZIO] - Calcolatore

#include <_Primes.au3>
#include <String.au3>
#include <Math.au3>

Global $iMin = 12
Global $iMax = 999999999
Global $count = $iMin

Do
       ConsoleWrite("Numero analizzato: "&$count&"                ")
       $spl = StringSplit($count, "")
       If _MathCheckDiv(Number($spl[0]), 2) = 2 Then
               $pare = 1
       Else
               $pare = 0
       EndIf
       $spl = StringSplit($count, "")
       If $count = Number(_StringReverse($count)) And _IsPrime($count) = 1 And $pare = 1 Then
               ConsoleWrite("Sì"&@CRLF)
               MsgBox(0, "Calcolatore", "Il primo numero primo palindromo pari è: "&$count)
               ExitLoop
       Else
               ConsoleWrite("No"&@CRLF)
               $count += 1
               ContinueLoop
       EndIf
Until $count = $iMax
ConsoleWrite("Completato"&@CRLF)

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

typedef enum {true,false} bool;

bool n_pari(int num);
bool n_primo(int num);
bool n_palindromo(int num);

int main()
{
   int n=0;
   while (1==1)
   {
       if (n_pari(n)==true && n_primo(n) == true && n_palindromo(n) == true)
       {
           break;
       }
       n++;
   }
   printf("Il primo numero trovato e': %d",n);
   return 0;
}

bool n_pari(int num)
{
   if (num%2 == 0)
       return true;
   else
       return false;
}

bool n_primo(int num)
{
   int pos = (num+1)/2;
   while (pos > 1)
   {
       if (num % pos == 0 && pos != num && pos != 1) return false;
       pos--;
   }
   return true;
}

bool n_palindromo(int num)
{
   char to_str[4096];
   char *buff = NULL;
   itoa(num,to_str,10);
   buff = realloc(buff,strlen(to_str)+1*sizeof(char));
   strcpy(buff,to_str);
   strrev(buff);
   if (strcmp(to_str,buff) == 0)
       return true;
   else
       return false;
   free(buff);
}