Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
1 / 1 / 0
Регистрация: 13.10.2014
Сообщений: 69
1

Удалить все элементы списка, содержащие числа большие, чем среднее значение элементов списка

25.12.2014, 18:44. Просмотров 1078. Ответов 2
Метки нет (Все метки)

Сформировать список из N целочисленных случайных элементов (N – вводится
пользователем, значения элементов выбирать из диапазона от 0 до 99). Удалить все
элементы списка, содержащие числа большие, чем среднее значение элементов
списка.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.12.2014, 18:44
Ответы с готовыми решениями:

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

Удалить все строки матрицы, содержащие элементы, большие числа 34
Дана вещественная матрица А(n,m),где n>10, m<10. Разработайте программу, которая удаляет все...

Удалить из списка все элементы, большие среднего арифметического
Здравствуйте. Задача такая:Написать программу по созданию, просмотру, добавлению и решению...

Удалить из списка все элементы, содержащие цифру 0
Сформировать список из N целочисленных случайных элементов (N – вводится пользователем, значения...

2
3634 / 1725 / 1935
Регистрация: 10.12.2014
Сообщений: 6,730
26.12.2014, 07:17 2
Лучший ответ Сообщение было отмечено newbieee как решение

Решение

Если воспользоваться списком, который я создал в другом твоём вопросе, то вот так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
procedure Delete(var Cur : tSpis);
var
  Tmp : tSpis;
begin
  Tmp := Cur;
  Cur := Cur^.Next;
  
  if Tmp^.Pred <> nil then
    Tmp^.Pred^.Next := Cur;
  if Cur <> nil then
    Cur^.Pred := Tmp^.Pred;
    
  Dispose(Tmp);
end;
 
…
Cur := First;
while Cur <> nil do
  if Cur^.X > Srednee then
    Delete(Cur)
  else
    Cur := Cur^.Next;
1
1 / 1 / 0
Регистрация: 13.10.2014
Сообщений: 69
26.12.2014, 14:02  [ТС] 3
Цитата Сообщение от JuriiMW Посмотреть сообщение
Если воспользоваться списком, который я создал в другом твоём вопросе, то вот так:
Спасибо!)) :-)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.12.2014, 14:02

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Удалить из списка все числа, по модулю большие числа 20
Здравствуйте. Была поставлена следующая задача: Создать очередь из 20 элементов, информационные...

Удалить из списка все парные элементы и поместить их в конец списка в обратном порядке
Доброго времени суток, уважаемие форумчани, помогите Создать список L , элементами которого...

Удалить из списка все элементы, равные последнему; найти длину полученного списка
Помогите реализовать.Создайте список и Удалите из списка все элементы, равные последнему, найдите...

Заданы три списка. Удалить из первого списка все элементы остальных списков
Помогите пожалуйста, мне нужно сессию досрочно сдать( в роддом надо) а практика только началась, а...

Удалить из списка все отрицательные элементы и поместить их в конец списка в обратном порядке
Пожалуста, помогите решить задачку: Составит программу, которая создает список L елементами...

Число элементов списка, среднее значение, минимальный и максимальный элемент в списке, медиану списка
Напишите функцию print_statistics(arr), которая принимает список целых чисел и печатает несколько...


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

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

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