Решение задачи Boolean 23

#include <iostream>
#include <math.h>

using namespace std;

int main(void)
{
    int A;
    cout << "A:";
    cin >> A;

    A = abs (A);

    cout << (A%10==A/1000 & A%100/10 == A%1000/100) << endl;

    return 0;
}

import random

N = random.randrange(1000,10000)
N = 2222
print("Число: ", N)
p1 = int(N/100)
p2 = N-p1*100
p2_d1 = int(p2/10)
p2_d0 = p2 - p2_d1*10
print("Половина 1: ", p1)
print("Половина 2: ", p2)
print("Десятки: ", p2_d1)
print("Единицы: ", p2_d0)
x = (p1 == (p2_d0*10 + p2_d1))
print("Число одинаково слева направо и справа налево: ", x)
									

program Boolean23;
var
 A: Integer;
begin
  Write('Введите число A: ');
  Readln(A);
  Writeln(((A mod 10)=(A div 1000)) and (((A mod 100) div 10 ) =((A mod 1000) div 100 )));
end.