👤
IONUTSARACUTAZE
a fost răspuns

Ajutati-ma sa elaborez un program ce va afisa suma componentelor pozitive
va roggg!!

Răspuns :

LPERJERUZE
program suma_pozitiva;
var n,i, suma :integer;
    sir : array[1..100] of integer;
begin
     write(‘Dati numarul de lemente pentru vector:’); readln(n);
     for i:=1  to n  do
         readln(sir[i]);
   
     suma := 0;
     for i:=1  to n  do 
         if sir[i] > 0 then suma := suma + sir[i];
    
     writeln('Suma componentelor pozivite : ', suma);
end;
Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că informațiile prezentate v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de ajutor, nu ezitați să ne contactați. Vă așteptăm cu drag data viitoare și vă încurajăm să ne salvați în lista de favorite!


Ze Questions: Alte intrebari