Дан массив из 50 целых чисел. Найти среднее арифметическое его элементов.
Нет комментариев
Ответы
Гость Паскаль:
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.
1 комментария:
Если n надо вывести - writeln(n) в конце
Если n надо вывести - writeln(n) в конце Похожие вопросы
Информатика
Не пойму, олимпиада....
Список предметов
