👤
IANACONDORACHIWIX
a fost răspuns

Utilizatorul introduce de la tastatură numere întregi pozitive, separate prin acționarea tastei <ENTER >. Sfârșitul secvenței de numere e indicat prin introducerea numărului 0. Scrieți un program care afișează pe ecran :
a) suma și media aritmetică a numerelor pare ;
b) suma și media aritmetică a numerelor impare;
VĂ ROG MULT, AJUTAȚI-MĂ!❤️​

Răspuns :

Răspuns:

program SumaMedia;

var num, sumapare, sumaimp, nrpare, nrimp:integer;

   mediapare, mediaimp:real;

begin

 writeln('introduceti numere naturale pozitive');

 writeln('introducerea lui 0 este STOP');

 sumapare:=0; sumaimp:=0;

 read(num);

 while num<>0 do

   begin

     if num mod 2=0 then begin inc(sumapare,num); inc(nrpare); end

     else begin inc(sumaimp,num); inc(nrimp); end;

     read(num);

   end;

 writeln('a) Suma numerelor pare = ', sumapare);

 mediapare:=sumapare/nrpare;

 writeln('   Media aritmetica a numerelor pare = ',mediapare);

 writeln('b) Suma numerelor impare = ', sumaimp);

 mediaimp:=sumaimp/nrimp;

 writeln('   Media aritmetica a numerelor impare = ',mediaimp);

end.

Explicație:

Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că informațiile disponibile v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de sprijin, nu ezitați să ne contactați. Vă așteptăm cu drag și data viitoare! Nu uitați să adăugați site-ul nostru la favorite pentru acces rapid.


Wix Learning: Alte intrebari