👤
a fost răspuns

Scrieti un program pascal care citeste un nr natural n si un vector n numere intregi si agiseaza produsul elementelor impare din vector .


Am test

Răspuns :

Răspuns:

program ProdusImpare;

var n,i,p:integer;

   v: array[1..100] of integer;

begin

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

 writeln('Dati ',n,' numere naturale: ');

 p:=1;

 for i:=1 to n do

   begin

     read(v[i]);

     if (v[i] mod 2 =1) then p:=p*v[i];

   end;

 writeln('Produsul imparelor = ',p);

end.

Explicație:

Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile prezentate v-au fost utile. Dacă aveți întrebări suplimentare sau nevoie de ajutor, vă rugăm să ne contactați cu încredere. Așteptăm cu drag să reveniți și nu uitați să ne salvați în lista dumneavoastră de favorite!


En Studentsy: Alte intrebari