Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Неправильный вывод. https://www.cyberforum.ru/ pascal/ thread1877235.html
Подскажите пожалуйста почему выводятся одни нули. Заранее благодарю. program core; uses moduli; var a, b: x; i, k1, k2, n: integer; s1, s2, z: real;
Программа Hide.exe Pascal
Добрый вечер. Помогите найти ошибку в коде. Program Program1; const Vig: string = '...
Вычислить сумму ряда Pascal
Вычислить сумму S = 1 ∙ 3 + 3 ∙ 5 + 5 ∙ 7 + … + (2n-1) ∙ (2n+1) для заданного n И как будет выглядеть схема алгоритма программы????
Pascal Даны длины трех отрезков. Определить, можно ли из этих отрезков сложить треугольник? Даны длины трех отрезков. Определить, можно ли из этих отрезков сложить треугольник? и как сделать схему данной программы??? https://www.cyberforum.ru/ pascal/ thread1877044.html
Pascal Написать функцию, которая выясняет, является ли число кратным 3 https://www.cyberforum.ru/ pascal/ thread1877022.html
Написать подпрограмму-функцию, которая выясняет, является ли заданное пользователем целое число кратным 3 (результат функции - значение логического типа). Пользователь задает 3 значения. ...
Упорядочить заданные элементы прямоугольной матрицы Pascal
Элементы, расположенные на периметре прямоугольной матрицы, сгруппировать в порядке возрастания, начиная с элемента, расположенного в левом верхнем углу матрицы. Обход элементов производить по...
Pascal Распечатать список студентов, фамилии которых начинаются с буквы Б, и их даты рождения
Распечатать список студентов, фамилии которых начинаются с буквы Б, и их даты рождения. Код.
Pascal Для произвольной матрицы(m,n) элементы главной диагонали расположить в порядке возрастания Для произвольной матрицы(m,n) элементы главной диагонали расположить в порядке возрастания!!! Также записать матрицу в виде ромба! https://www.cyberforum.ru/ pascal/ thread1876517.html
Pascal линейный и бинарный поиск https://www.cyberforum.ru/ pascal/ thread1876458.html
1)Сформировать массив a,элементы которого выбираются случайным образом из интервала . Определить, содержит ли он заданное число. Если элемент найден, то вставить после него элемент, вдвое больший...
Pascal Подпрограмма-функция Написать программу решения задачи, используя функции: в основной функции ввести с клавиатуры или вычислить с помощью генератора случайных чисел 10 элементов массива вещественного типа и напечатать... https://www.cyberforum.ru/ pascal/ thread1876322.html
0 / 0 / 0
Регистрация: 13.12.2016
Сообщений: 11
0

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

13.12.2016, 21:24. Просмотров 1139. Ответов 2
Метки (Все метки)


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

Вернуться к обсуждению:
Определить какие числа встречаются более двух раз, вывести на экран элементы больше среднего арифметического
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
13.12.2016, 21:24
Готовые ответы и решения:

Дана символьная строка. Вывести на экран те символы которые встречаются в строке более 3х раз
Работа со строками. Дана символьная строка. Вывести на экран те символы которые встречаются в...

Вывести на экран элементы одномерного массива, большие среднего арифметического
Вывести на экран элементы одномерного массива, большие среднего арифметического.

Вывести элементы больше среднего арифметического
Описать числовой массив на 15 элементов и заполнить его случайными целыми числами, каждое из...

Матрица. Вывести вектор сумм элементов строк. Вывести элементы матрицы, которые встречаются в матрице более 3 раз
Дана вещественная матрица размером 4х6 (ее элементы нужно ввести с клавиатуры). Упорядочить ее...

2
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.