Pascal
Помогите девочке, сделайте, чтоб код работал
var a:array[1..31] of integer;
i,n,s:integer;
sr:real;
begin
readln(n);
for i:=1 to n do
read(a[i]);
s=0;
for i:=1 to n do
s:=s+a[i];
sr:=s/n;
write(sr);
end.
Пишет такую ошибку Error: Illegal expression
main.pas(8,1) Warning: Variable "s" does not seem to be initialized
main.pas(13,4) Fatal: There were 1 errors compiling module, stopping
Fatal: Compilation aborted
Error: /usr/bin/ppcx64 returned an error exitcode