Question

СРОЧНО!!!Напишите функцию в Паскале,которая "разворачивает" десятичную запись числа наоборот,например,из 123 получается 321,а из

3210-0123

Answer 1

Var
 l,i:longint;
S:String;
begin
 Read(S);
 l:=length(S);
For i:=l downto 1 do Write(S[i]); 
end.