Var S:array[1..10] of integer; a,b,c,i,n,f,g:integer; begin writeln('veedite interval'); readln(a,; n:=b-a; writeln('vvedite chisla v intervsle'); for i:=1 to n do begin readln©; S:=c; end; for i:=1 to n do begin f:=S; g:=g+f; end; g:=g/n; (вот тута ошибка, будьте добры, обьясните как правильно )) writeln('srednee znachenie =',g); readln; end.