Question

ПОМОГИТЕ ПОЖАЛУЙСТА !
дано трехзначное число, нужно поменять цифры местами
типо х=abc а надо чтоб стало x=саbстало x=cba

Вот что дано...
Дано 3хзначное число (179) поменять числа местами (971)

Answer 1

program gt;
var n,a,b,c,d:integer;
begin
read(n);
a:=n div 100;
b:=(n mod 100)div 10;
c:=n mod 10;
d:=a;
a:=c;
c:=d;
writeln(a,b,c);
end.