Răspuns :
program rasturnat;
var n, num, cif: integer;
begin
write('introdu numar natural n='); read(n);
num:=0;
while (n>0) do
begin
cif:=n mod 10;
num:=num*10 + cif;
n:= n div 10;
end;
writeln(' rasturnatul lui este ', num);
end.
Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că informațiile disponibile v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de sprijin, nu ezitați să ne contactați. Vă așteptăm cu drag și data viitoare! Nu uitați să adăugați site-ul nostru la favorite pentru acces rapid.