Дано шестизначное яисло.Найти число,полученное перестановкой 1-ой и 2-ой цифр,3-ей и 4-ой цифр,5-ой и 6-ой цифр.

var a,a1,a2,a3,a4,a5,a6,b:integer;beginwrite('a = ');readln(a);a1:=a div 100000;a2:=a div 10000 mod 10;a3:=a mod 10000 div 1000;a4:=a mod 1000 div 100;a5:=a mod 100 div 10;a6:=a mod 10;b:=a2*100000+a1*10000+a4*1000+a3*100+a6*10+a5;writeln('b = ',b);end.Пример:a = 123456b = 214365