👤

Se dă tablou C[1..60] de numere întregi. Scrie un program utilizând o funcție care va calcula produsul elementelor negative a acestui tablou.Vă roog ajutațimă ca chiar nu ințeleg((

Răspuns :

Răspuns:

program prod1;

var c:array[1..60] of integer;

   i, n, produs:integer;

begin

    write('Dati lungimea vectorului(intre 1 si 60): ');

    readln(n);

    for i:=1 to n do

        readln(c[i]);

    produs:=1;

    {Parcurgem vectorul si daca avem un element negativ il inmultim}

    for i:=1 to n do

        if c[i] < 0 then {numar negativ}

           produs:=produs*c[i];

    write('Produsul numerelor negative este : ',produs);

    readln;

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