Помогите пожалуйста составить алгоритм и решить его что ли! Задан одномерный массив из n элементов. Найдите среднее арифметическое всех этихэлементов.
Program chik; var n,i,s:integer; h:real; a:array[1..10000]of integer; begin read(n);s:=0; for i:=1 to n do begin read(a); s:=s+a; end; h:=s/h; writeln(h); end. n-количество чисел s-сумма чисел