Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
0 / 0 / 1
Регистрация: 23.01.2010
Сообщений: 45

Из массива Х удалить первую группу знакочередующихся элементов.

02.06.2010, 22:36. Показов 1437. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Из массива Х удалить первую группу знакочередующихся элементов.

Добавлено через 59 минут
Здесь же есть примерный код из раздела Стандартные операции с массивами
9) Удаление элемента в одномерном массиве
Пусть нужно удалить все нулевые элементы из введенного пользователем массива. А как переправить на нужные мне значения ?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var
   a:array[1..100] of integer;
   i,m,n:integer;
begin
 readln(n);    {считываем количество элементов}
 for i:=1 to n do
  read(a[i]);
 writeln('Массив');
 for i:=1 to n do
  write(a[i],' ');
 writeln;
 writeln('После удаления');
 m:=0;
 for i:=1 to n do
  if (a[i]=0) then inc(m) else a[i-m]:=a[i]; {удаляем элементы}
 dec(n,m);  {уменьшаем количество элементов массива на количество нулевых элементов}
 for i:=1 to n do
  write(a[i],' '); {вывод на экран}
 readln
end.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
02.06.2010, 22:36
Ответы с готовыми решениями:

Удалить из массива первую группу элементов, представляющих собой знакочередующийся ряд
Ребят, всем здрасьте. Такое дело, учусь на факультете Компьютерных Наук на дизайнера, но добавили...

Удалить из массива первую группу нулей идущие подряд
Удалить из массива первую группу нулей идущие подряд. Если нет нулей то выдать сообщение об ошибки.

Расположить в порядке возрастания первую группу смежных отрицательных элементов массива
У меня задание такое: Расположить в порядке возрастания первую группу смежных отрицательных...

5
1 / 1 / 0
Регистрация: 03.10.2009
Сообщений: 15
02.06.2010, 22:42
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var
   a:array[1..100] of integer;
  d,i,m,n:integer;
begin
 readln(n);    {считываем количество элементов}
 write('Нужное вам значение)))');
readln(d);
 for i:=1 to n do
  read(a[i]);
 writeln('Массив');
 for i:=1 to n do
  write(a[i],' ');
 writeln;
 writeln('После удаления');
 m:=0;
 for i:=1 to n do
  if (a[i]=d) then inc(m) else a[i-m]:=a[i]; {удаляем элементы}
 dec(n,m);  {уменьшаем количество элементов массива на количество нулевых элементов}
 for i:=1 to n do
  write(a[i],' '); {вывод на экран}
 readln
end.
1
 Аватар для PreviouS
4 / 4 / 7
Регистрация: 18.10.2009
Сообщений: 20
04.06.2010, 08:39
Цитата Сообщение от Risk Посмотреть сообщение
знакочередующихся
Черездующихся по какой-либо закономерности... какой?
0
0 / 0 / 1
Регистрация: 23.01.2010
Сообщений: 45
04.06.2010, 15:53  [ТС]
Эм ... я написал полное условие задачи, каких либо закономерностей описано не было ...
0
Фрилансер
 Аватар для Mad_Dog
452 / 433 / 117
Регистрация: 01.06.2010
Сообщений: 1,314
04.06.2010, 16:10
видимо, если два соседних элемента имеют различные знаки ("+" и "-"), то они являются знакочередующимися... Группа будет состоять только из тех последовательных элементов, где соседние элементы отличаются знаками...
0
0 / 0 / 1
Регистрация: 23.01.2010
Сообщений: 45
04.06.2010, 22:46  [ТС]
Вы мне поможете ?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
04.06.2010, 22:46
Помогаю со студенческими работами здесь

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

Удалить последнюю группу отрицательных смежных элементов массива
Помогите, пожалуйста! Мне нужно удалить последнюю группу отрицательных смежных элементов. Т.е....

Удалить из массива последнюю группу элементов, представляющих собой знакочередующийся ряд
Удалить из массива последнюю группу элементов, представляющих собой знакочередующийся ряд. Диапазон...

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

Определить количество знакочередующихся элементов массива
Сама задача: Определить количество знакочередующихся элементов массива (массив динамический,...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten
8Observer8 27.02.2026
Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru