35 . составить блок - схему. : определить среднее арифметическое последовательности чисел a[1], a[2], … a[n]. числа n, a[1], a[2], … a[n] вводятся с клавиатуры.

Var
 n,i,a:integer;
 s:real;
begin
readln(n);
for i:=1 to n do
 begin;
  readln(a);
  s:=s+a;
 end;
s:=s/n;
writeln(s);
end.