Помогите решить задачу. Поменять местами первую и последнюю цифру натурального числа. решение в паскале. Тема while, repeat. Подробно, понятно пжлст

var n,m,k1,k2,p:integer;

Извиняюсь

(http://znanija.com/task/17789999) если есть желание, можно еще одну задачу решить?

А сами не пробовали?

пробовал, без успешно, всю программу почти сделал, не могу разобраться в произведении

var n,m,k1,k2,p:integer;beginwrite('n = '); readln(n);k1:=n mod 10; //последняя цифраk2:=n; p:=1;while k2>9 do begin k2:=k2 div 10; // первая цифра p:=p*10;    // нужная степень числа 10 end;m:=k1*p+(n mod p - k1)+k2;writeln('m = ',m);end.Пример:n = 326901574m = 426901573