👤
a fost răspuns

Mă poate ajuta cineva cu acest program în pascal vă rog?​

Mă Poate Ajuta Cineva Cu Acest Program În Pascal Vă Rog class=

Răspuns :

LICĂ211GO

Răspuns:

program divizoriProprii;

var

   a, n : integer;

   

begin

   writeln ('n = ');

   read (n);

   

   { parcurgerea si afisarea divizorilor proprii}

   

   for a := ( n div 2 ) downto 2 do

   begin

       if( n mod a = 0) then

           write ( a:2 );

   end;

end.

Explicație:

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


Go Learnings: Alte intrebari