👤

Cum se face problema asta. Va rog raspuns cat mai rapid.
Se citeste un nr natural format din 4cifre nenule. Aflati oglinditul nr dat si media aritmetica a cifrelor sale


Răspuns :

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.