Ответы
Ответ дал:
0
Паскаль:
var i, s : integer;
n: real;
begin
n := 0;
for i:= 1 to 50 do begin
readln(s);
n:= n + s;
end;
n:= n / 50;
end.
var i, s : integer;
n: real;
begin
n := 0;
for i:= 1 to 50 do begin
readln(s);
n:= n + s;
end;
n:= n / 50;
end.
Ответ дал:
0
Если n надо вывести - writeln(n) в конце
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад