Question

Составить программу. Дано число N нужно поменять порядок цифр в этом числе и вывести его. Число N вводится с клавиатуры.

Answer 1

Var
   s,s1:string;
  i:integer;
begin
 readln(s);
s1:='';
 for i:=length(s) downto 1 do s1:=s1+s[i];
writeln(s1);
end.