Вычислть среднее арифметическое ненулевых элементов введенного с клавиатуры массива целых чисел.

24.12.2012, 15:09. **Показов** 1442. **Ответов** 1

Author24 — интернет-сервис помощи студентам

Помогите написать программу
Написать программу, которая вычисляет среднее арифметическое ненулевых элементов введенного с клавиатуры массива целых чисел.

@Roman1295 · 25.12.2012, 14:31

Pascal

If mas[i]<>0 then
begin
S:=S+mas[i];
inc(k);
result:=S/k {result : real}
end;

dima2828
		1
	Вычислть среднее арифметическое ненулевых элементов введенного с клавиатуры массива целых чисел. 24.12.2012, 15:09. Показов 1442. Ответов 1 Метки нет (Все метки) Помогите написать программу Написать программу, которая вычисляет среднее арифметическое ненулевых элементов введенного с клавиатуры массива целых чисел.

	25.12.2012, 14:31

Вычислть среднее арифметическое ненулевых элементов введенного с клавиатуры массива целых чисел.

Решение