DODAJ +
Informatyka

Napisz program, który będzie wprowadzał z klawiatury liczby całkowite aż do wystąpienia liczby niedodatniej oraz obliczał i wyprowadzał ich średnią arytmetyczną. Jaka liczba będzie tu znacznikiem końca danych?

Napisz program, który będzie wprowadzał z klawiatury liczby całkowite aż do wystąpienia liczby niedodatniej oraz obliczał i wyprowadzał ich średnią arytmetyczną. Jaka liczba będzie tu znacznikiem końca danych?
Odpowiedź

var suma,n,l:longint; begin while l>=0 do begin readln(l); n:=n+1; suma:=suma+l; end; writeln(suma/n); readln; end. //znacznikiem jest oczywiście liczba ujemna

Dodaj swoją odpowiedź