ПОМОГИТЕ РЕШИТЬ ПРОГРАММУ ПО ИНФОРМАТИКЕ : Дан одномерный массив S(N). Определить...

Question

ПОМОГИТЕ РЕШИТЬ ПРОГРАММУ ПО ИНФОРМАТИКЕ : Дан одномерный массив S(N). Определить количество элементов, равных среднему значению массив S(N). Заменить эти элементы на 100

Answer 1

For i:= 1 to n do
begin
sr_arf = sr_arf +s[i]; - считаем сумму всех элементов
end;
sr_arf=sr_arf/n; - считаем среднее арифметичкое
for i:= 1 to n do
if (s[i] = sr_arf) then - если текущий элемент равен среднему арефм-му
begin
kol:=kol+1; считаем количество элементов
s[i] := 100; присваиваем текущему элементу 100
end;

Comments

ЭТО НА КАКОМ ЯЗЫКЕ??ЧТО ОЗНАЧАЕТ sr_arf = sr_arf И kol:=kol+1;??

---

это на паскале,могу на си

---

ЧТО ОЗНАЧАЕТ sr_arf = sr_arf И kol:=kol+1;??ПОДСКАЖИТЕ,ЧТО ВЫ ЗАМЕНИЛИ

---

написал комментарии

---

А МОЖЕТЕ КОНКРЕТНО ЗАДАЧУ С VAR НАПИСАТЬ??

---

я уже все решил,осталось объявить переменные

---

спасибо