Euler Project Problem #104 Solution

My solution to Euler Project Problem #104

It uses C.

Click to directly download euler-solution-104.c

// filename 'euler-solution-104.c' // By: Louis Casillas, oxaric@gmail.com // Euler Problem #104 // Find the Fibonacci sequence for which the first nine digits and the last nine digits are 1-9 pandigital #include <stdio.h> #include <gmp.h> char number_string[100000]; char isPandigital( unsigned long int num ) {    if ( num < 123456789 )    {       return 0;    }    char num_of_unique_digits = 0;    char number_array[9];    unsigned long int temp = num;    int i;    int j;    for ( i = 0; i < 9; i++ )    {       number_array[i] = temp - ((temp / 10) * 10);       if ( number_array[i] == 0 )       {          return 0;       }       temp /= 10;    }       char is_unique = 1;        for ( i = 0; i < 9; i++ )    {       for ( j = 0; j < 9; j++ )       {          if ( i != j )          {             if ( number_array[i] == number_array[j] )             {                is_unique = 0;             }          }       }              if ( is_unique )       {          num_of_unique_digits++;       }       is_unique = 1;    }       if ( num_of_unique_digits == 9 )    {       return 1;    }    else    {       return 0;    } } int numOfDigits( mpz_t num ) {    int num_of_digits = 0;        char *number_pointer;    mpz_get_str( number_string, 10, num );        number_pointer = number_string;    while( *number_pointer != '' )    {       num_of_digits++;       number_pointer++;    }    return num_of_digits; } char areBothSidesPandigital( mpz_t num ) {    mpz_t mod;    mpz_init_set_str( mod, "1000000000", 10 );    mpz_t temp;    mpz_init( temp );    unsigned long int number_group = 0;    mpz_mod( temp, num, mod );    number_group = mpz_get_ui( temp );    if ( isPandigital( number_group ) )    {       mpz_ui_pow_ui( temp, 10, (numOfDigits( num ) - 9) );       mpz_tdiv_q( temp, num, temp );       number_group = mpz_get_ui( temp );       if ( isPandigital( number_group ) )       {          mpz_clear( temp );          mpz_clear( mod );          return 1;       }    }        mpz_clear( temp );    mpz_clear( mod );    return 0; } int main() {    mpz_t num1;    mpz_init_set_str( num1, "1", 10 );    mpz_t num2;    mpz_init_set_str( num2, "1", 10 );    char add_to_first = 1;    char are_we_up_to_ten_digits = 0;    int current_sequence = 2;    while( 1 )    {       current_sequence++;       if ( add_to_first )       {          mpz_add( num1, num1, num2 );          add_to_first = 0;       }       else       {          mpz_add( num2, num1, num2 );          add_to_first = 1;       }       if ( add_to_first )       {    //      printf( "\nNumber of digits: %d\n", numOfDigits( num2 ) );          if ( areBothSidesPandigital( num2 ) )          {             printf( "\n\nThe double pandigital Fibonacci sequence was found at: %d\n\n", current_sequence );             return 0;          }       }       else       {          //printf( "\nNumber of digits: %d\n", numOfDigits( num1 ) );          if ( areBothSidesPandigital( num1 ) )          {             printf( "\n\nThe double pandigital Fibonacci sequence was found at: %d\n\n", current_sequence );             return 0;          }       }          }    //mpz_ui_pow_ui( temp, base, exp );    //mpz_out_str( out_file, 10, temp );    //printf("\n");    //mpz_out_str( stdout, 10, temp );    //printf("\n\n");    printf("\n\n");    return 0; }