обусловьте значение всех переменных после выполнения фрагмента программки:a:=2200;b:=a div

Обусловьте значение всех переменных после исполненья куска программки:
a:=2200;
b:=a div 100;
c:=(a div 10) mod 10;
d:=a mod 10;
a:=c*10+b;
Чему будет одинакова переменная 'r' после исполненья этой программки:
a:=333;
s:=a div 100;
d:=(a-s*100) div 10;
e:=a-s*100-d*10;
b:=e*100+d*10+s;
r:=a-b;