Форум программистов, компьютерный форум, киберфорум
Наши страницы

Free Pascal

Войти
Регистрация
Восстановить пароль
 
Nekazz
0 / 0 / 0
Регистрация: 23.03.2017
Сообщений: 9
#1

Переписать в новый массив только те элементы исходного, которые больше среднего арифметического - Free Pascal

23.03.2017, 19:03. Просмотров 170. Ответов 2
Метки нет (Все метки)

дан массив определенной длины. Задать его значения случайным образом а затем переписать в новый массив только те элементы исходного которые больше среднего арифмитеческого
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.03.2017, 19:03
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Переписать в новый массив только те элементы исходного, которые больше среднего арифметического (Free Pascal):

Переписать в массив Y те элементы исходного массива, которые строго больше своих соседей - Pascal
Задан целочисленный массив Х из 20 элементов! Переписать в массив Y те элементы исходного массива, которые строго больше своих соседей....

Удалить из массива те элементы, которые больше среднего арифметического - Pascal
Дан массив целых чисел D1,...,D30. Удалить из него те элементы, которые больше среднего арифметического.

Переписать в другой массив только отрицательные элементы исходного - Pascal
Уважаемые форумчане! Прошу вас о помощи!!! нужно выполнить задание а я ни в зуб ногой в информатике (((( Ввести массив, содержащий...

Дан массив А (8,5). Распечатать элементы строк, первый элемент в которых больше среднего арифметического строк - Free Pascal
Помогите написать блок-схему программы пожалуйста. Дан массив А (8,5). Распечатать элементы строк, первый элемент в которых больше...

Составить программу по нахождению среднего арифметического тех чисел, которые больше нуля. - Pascal
Помогите пожалуйста составить эту программу.. "которая запрашивает и вводит количество действительных чисел, затем запрашивает и вводит...

Создать матрицу C: элементы матрицы В, по величине больше среднего арифметического, заменить нулями - Pascal
Дана матрица В(8 8). Необходимо сформировать новую матрицу С(8 8), в которой элементы матрицы В(8 8) по величине больше среднего...

2
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
3588 / 2575 / 1758
Регистрация: 05.06.2014
Сообщений: 12,298
23.03.2017, 19:11 #2
Процедуры, функции, одномерные массивы
0
bormant
Модератор
Эксперт Pascal/DelphiЭксперт NIX
3598 / 2295 / 1193
Регистрация: 22.11.2013
Сообщений: 6,101
24.03.2017, 21:34 #3
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
const n=10;
var
  a, b: array [1..n] of Integer;
  i, m: Integer;
  s: Longint;
begin
  Randomize; {m:=0; s:=0;}
  for i:=1 to n do a[i]:=Random(100);
  for i:=1 to n do Inc(s,a[i]);
  for i:=1 to n do if a[i]*n>s then begin
    Inc(m); b[m]:=a[i];
  end;
  Write('A ='); for i:=1 to n do Write(' ',a[i]); WriteLn;
  Write('B ='); for i:=1 to m do Write(' ',b[i]); WriteLn;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
24.03.2017, 21:34
Привет! Вот еще темы с ответами:

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

Сформировать массив, в котором элементы в 2 раза больше, чем соответствующие элементы исходного - Pascal
Составьте программу, которая запрашивает значение элементов одномерного числового массива А, формирует и выводит на экран в строку новый...

Все элементы, большие среднего арифметического значения MAX и MIN элементов перенести в другой массив - Free Pascal
Задание №1 В одномерном массиве найти максимальный (MAX) и минимальный (MIN) элементы. Все элементы, большие среднего арифметического...

Сформировать новый массив, в который включить только латинские буквы из исходного массива - Pascal
дан массив .сформировать новый массив, в который включить только латинские буквы из исходного массива


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

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