Помогите плиз)))Дано четырехзначное число. Если сумма его цифр является четным значением...

Question

Помогите плиз)))
Дано четырехзначное число. Если сумма его цифр является четным значением определить, равна ли сумма первых двух цифр сумме последних двух цифр.

Например число
1441 сумма цифр 10 – четное значение. 1+4 = 4+1. Ответ ДА
1320 сумма цифр 6 – четное значение. 1+3 не равно 2 + 0. Ответ НЕТ
на языке программирования (Vba) (visual basic)

Answer 1

Сделал на С++, может кто-нибудь переведет или вы поймёте логику программы. В целом вводим число и с помощью простого деления и остатка от деления, выражаем отдельные числа. Находим сумму и проверяем условия.

#include
using namespace std;
int main(void)
{  setlocale(LC_ALL, "Russian"); 
  int num, a1, a2, a3, a4, Sum; 
  cout << "Введите четырехзначное число: " ;  <br>  cin >> num; 
  a1 = num / 1000; //делим введенное число на цело,
  a2 = (num / 100)%10; // а потом используем остаток от деления
  a3= (num / 10) % 10;
  a4 = num % 10;
  Sum = a1 + a2 + a3 + a4; 
   if (Sum%2==0) 
    {      
        cout << "Сумма четная" <<endl ;      <br>        if (a1 + a2 == a3 + a4)        
               cout << "ДА, условие выполняется" << endl;      <br>        else        
               cout << "НЕТ, условие не выполняется" << endl;  <br>    }
  else  
       cout << "Сумма нечётная." <<endl;  <br>  system("pause"); 
  return 0;
}

---