ввести целое число и «перевернуть» его, так чтобы первая цифра стала последней и т.д. в программе КуМиР

алг перевертыш
нач
цел a,a1,b,i,k
ввод a
k:=0
b:=a
a1:=0
нц пока a>0
i:=mod(a,10)
k:=k+1;
a:= div(a,10)
кц
нц пока b>0
 a1:=a1+mod(b,10)*10**(k-1);
b:=div(b,10);
k:=k-1
кц
вывод " новое число =", a1
кон