👤
a fost răspuns

In fisierul in.txt se afla pe prima linie un numar natural intre 2 si 1000 iar pe a doua linie n numere naturale de cel putin 2 si cel mult 9 cifre. Scrie un program Pascal care afiseaza elementele palindroame.

Răspuns :

Răspuns:

program palindroame;

var n, i, num, gasit, pal, copie: integer;

begin

 write('n='); read(n);

 writeln('introdu ',n,' numere naturale separate prin spatiu:');

 gasit:=0;

 for i:=1 to n do

   begin

     read (num);

     copie:=num;

     pal:=0;

     while (copie>0) do

       begin

         pal:=pal*10+(copie mod 10);

         copie:=copie div 10;

       end;

     if (pal=num) then

       begin gasit:=1; write (num,' ');  end;

   end;

  writeln;

  writeln('au fost afisate palindroame...');

  if (gasit=0) then writeln('upss.. nu exista');

end.

   

Explicație:

Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile oferite v-au fost de ajutor. Nu ezitați să ne contactați pentru orice întrebare sau dacă aveți nevoie de asistență suplimentară. Vă așteptăm cu drag data viitoare și nu uitați să ne adăugați la favorite!


ID Learners: Alte intrebari