Интересная закономерность

    //N^M будем реализовывать;
    int N=0,M=3;
    int symma=0,symma2;
    N=StrToInt(Edit1->Text);
    for(int i=1;i<=N;i++)
    {
        if(i==1)symma+=1;
        else symma+=(i-1)*2;
    }
    symma2=symma;
    for(int j=1;j<N;j++)
    {
        symma+=symma2+2*j;
    }
    Edit2->Text=IntToStr(symma);

    for ( unsigned long num = 1, elem_in_sequence, summ_of_sequence; num < 11; num++, summ_of_sequence = 0 ) {
        // вычисляем первый элемент в последовательности, принимая во внимание четность
        elem_in_sequence = num * num + ( num % 2 > 0 ? - 2 * ( num / 2 ) : - 1 - 2 * ( num / 2 - 1 ) ); // фишка в том, что при делении переменной int результат округляется в меньшую сторону
        cout << endl << num << "^3 = ";
        // складываем элементы последовательности, выводя значения и результат
        for ( unsigned long i = 0; i < num; i++, elem_in_sequence += 2 ) {
            summ_of_sequence += elem_in_sequence;
            cout << elem_in_sequence << ( i + 1 == num ? " = " : " + " );
        }
        cout << summ_of_sequence;
    }