Пожалуйста, напишите программу для того, чтобы в целом натуральном числе n поменять местами первую и последнюю цифру, с помощью цикла While в Pascal ABC.
Дам за него 15 баллов. Пожалуйста, помогите!
- program chik;var n,a,b,s,q,k:integer;beginreadln(n);q:=n mod 10;while n>0 dobeginb:=n mod 10;n:=n div 10;s:=s*10+b;end;n:=q;s:=s div 10;while s>10 dobegink:=s mod 10;s:=s div 10;n:=n*10+k;end;n:=n*10+b;writeln(n);end.