Определить какие числа встречаются более двух раз, вывести на экран элементы больше среднего арифметического

@Sloth_sirit · Регистрация: 13.12.2016

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

В одномерном массиве, состоящем из n вещественных элементов:
1) определить какие числа встречаются в нем более двух раз;
2) вывести на экран элементы массива, больше среднего арифметического.
Сжать массив, удалив из него нули.

@Sloth_sirit · 19.12.2016, 06:10 **[ТС]**

up!

@ZX Spectrum-128 · 19.12.2016, 17:01

Сообщение от Sloth_sirit

Сжать массив, удалив из него нули.

Получить новый массив "сжатием " данного массива ,удалив из него все нулевые элементы.
2.

Pascal

s:=0;
for i:=1 to n do
 s:=s+a[i];
s:=s/n;
for i:=1 to n do
if a[i]>s then
 write(a[i]);

@Sloth_sirit 0 / 0 / 0 Регистрация: 13.12.2016 Сообщений: 11
		1
	Определить какие числа встречаются более двух раз, вывести на экран элементы больше среднего арифметического 13.12.2016, 21:24. Показов 1509. Ответов 2 Метки нет (Все метки) В одномерном массиве, состоящем из n вещественных элементов: 1) определить какие числа встречаются в нем более двух раз; 2) вывести на экран элементы массива, больше среднего арифметического. Сжать массив, удалив из него нули. 0

@Sloth_sirit 0 / 0 / 0 Регистрация: 13.12.2016 Сообщений: 11
	19.12.2016, 06:10 [ТС]	2
	up! 0

	19.12.2016, 17:01

Определить какие числа встречаются более двух раз, вывести на экран элементы больше среднего арифметического

Решение