trb sa salvezi nr intr-o variabila si dupa il imparti in cifre si formezi un nou nr cu cfr nr dat(acesta va fi oglinditul lui cfr punandu-le in ordinea in care le-ai scos);
while n<>0 do
begin
x:=n mod 10;
n:=n div 10;
nr:=nrf*10+x;
end;
asta e secventa de program de care ai nevoie .Inainte de secventa ii atribui luinr val 0 si dupa faci M.a.
