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

Сформировать новый массив B ,состоящий из нечетных элементов массива

14.09.2010, 13:01. Показов 6034. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дан массив A из N целых чисел.Сформировать новый массив B ,состоящий из нечетных элементов массива A .Затем вывести массив B и количество элементов в нем
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
14.09.2010, 13:01
Ответы с готовыми решениями:

Сформировать новый массив В, состоящий из положительных элементов массива А
Задача простая, но в силу своей неопытности решить её не получается. HELP! Массив А вводится с клавиатуры. Сформировать новый массив В,...

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

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

5
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
14.09.2010, 13:53
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
k:=0;
for i:=1 to n do
if odd(a[i]) then//odd(a[i] - нечетное)
 begin
  k:=k+1;
  b[k]:=a[i];
 end;
if k=0 then write('В массиве нет нечетных элементов')
else
 begin
  writeln('В массиве ',k,' нечетных элементов');
  for i:=1 to k do
  write(b[i],' ');
 end;
1
 Аватар для Solnishko
0 / 0 / 0
Регистрация: 20.04.2011
Сообщений: 35
17.10.2011, 16:18
что значит odd(a[i])
0
110 / 110 / 72
Регистрация: 13.10.2011
Сообщений: 227
17.10.2011, 16:33
Цитата Сообщение от Solnishko Посмотреть сообщение
что значит odd(a[i])
odd проверяет параметр на нечетность.
0
 Аватар для Solnishko
0 / 0 / 0
Регистрация: 20.04.2011
Сообщений: 35
17.10.2011, 16:49
а по проще....без этой команды???
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
17.10.2011, 16:57
Для малограмотных и не желающих учиться можно так
Pascal
1
if a[i] mod 2<>0 then
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
17.10.2011, 16:57
Помогаю со студенческими работами здесь

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

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

Сформировать одномерный массив, состоящий из положительных элементов, располагающихся в нечетных столбцах матрицы X (n x m)
Сформировать одномерный массив, состоящий из положительных элементов, располагающихся в нечетных столбцах матрицы X (n x m).

Сформировать новый массив, состоящий из элементов, равных соответственно суммам исходных массивов
помогите пожалуйста решить задачу даны три массива VEC 1=(1.0; 3.9; -2.6) VEC 2= (-7; 4.6; -11; 13) VEC 3=(6.9; -3; 12.3; 6.2; 1) ...

Сформировать массив B, состоящий из положительных элементов массива A, и найти в нём наибольший элемент
Дан массив из A из n целых чисел,сформировать массив B состоящий из положительных элементов массива A.Найти в массиве B наибольший элемент.


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
Автоматическое создание документа при проведении другого документа
Maks 29.03.2026
Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений
Maks 29.03.2026
Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru