Дано двухзначное число,поменять местами цифры блок схема и паскаль.

//Pascal ABC.NET v3.1 сборка 1172

Var
 a,b:integer;
begin
 readln(a);
 b:=a mod 10*10+a div 10;
 writeln(b);
end.

Пример ввода:
12
Пример вывода:
21