дано двухзначное число,поменять местами цифры блок схема и паскаль.ПОМОГИТЕ

//Pascal ABC.NET v3.1 сборка 1172Var a,b:integer;begin readln(a); b:=a mod 10*10+a div 10; writeln(b);end.Пример ввода:12Пример вывода:21