Запишите значение переменной F после выполнения фрагмента метода для переменной целого

Запишите значение переменной F после выполнения куска метода для переменной целого типа x= 1221:

A:=X div 1000;
B:= X mod 1000 div 100;
C:= X mod 100 div 10;
D:= X mod 10;
Y:=1000*d+100*c+10*b+a;
F:= X - Y+1;