Alcatuiti un program pascal care ne afla media aritmetica la matematica. Va rog mult am nevoie urgent

Răspuns :

var a:array[1..100] of integer;    n,i:integer;    avg,med:real;beginwriteln('Dati numarul de valori:');readln(n);writeln('Dati valorile');for i:=1 to n dobeginwrite('Val ',i,' =');readln(a[i]);end;for i:=1 to n doavg:=avg+a[i];med:=avg/n;writeln('Media aritmetica este: ',med:4:4);end.
Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Ne bucurăm dacă informațiile oferite v-au fost de ajutor. Pentru orice întrebare sau clarificare suplimentară, echipa noastră vă stă la dispoziție. Revenirea dumneavoastră ne onorează – nu uitați să ne salvați în lista de favorite!


RO Questions: Alte intrebari