Question

De la tastatura se introduce un numar natural format din 4 cifre.Scrieti un program care va calcula si afisa pe ecran oglinditul nr dat
P.s. in pascal

Answer 1

program a_1;
var n, inv:integer;
begin
write("n="); readln(n);
while (n<>0) do
inv:=inv*10+n mod 10;
n:= n div 10;
write(" Oglindit=',inv);
readln
end.

Bafta!