👤
a fost răspuns

Elaboraţi un program Pascal care citeşte de la tastieră un ţir de numere întregi pînă la întîlnirea numărului “0” şi afisează la ecran, în rînduri aparte suma şi media aritmetica a elementelor din acest şir. * DAU COROANA

Răspuns :

HOWARDAXZE

program brainly;

var suma, n:integer;

MA:real;

begin

suma:=0;

MA:=0;

readln(n);

while (n<>0) do begin

suma:=suma+n;

MA:=MA+1;

readln(n);

end;

Writeln('S=', suma);

MA:=suma/MA;

Writeln('MA=',MA:2:2);

end.

Rezultat:

Vezi imaginea HOWARDAX
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 sau aveți nevoie de suport suplimentar, nu ezitați să ne contactați. Ne bucurăm să vă revedem și vă invităm să ne adăugați în lista de favorite!


Ze Schools: Alte intrebari