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
Ответы
Ответ дал:
0
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.
Вас заинтересует
2 месяца назад
2 месяца назад
2 месяца назад
1 год назад
7 лет назад