Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
0 / 0 / 0
Регистрация: 18.12.2015
Сообщений: 8

Ввести целочисленный одномерный массив A, вывести его. Найти K– количество нечётных элементов в этом массиве

19.12.2015, 12:52. Показов 2290. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый вечер.
Помогите решить задачу,с обычным одномерным массивом справился,а со сложным не могу.


Ввести целочисленный одномерный массив A, вывести его. Найти K–
количество нечётных элементов в этом массиве. Произвести циклический
сдвиг вправо элементов массива K раз.

Добавлено через 12 часов 49 минут
Подскажите кто-нибудь...
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
19.12.2015, 12:52
Ответы с готовыми решениями:

Ввести одномерный целочисленный массив А, вывести его. В массиве отсортировать по убыванию все элементы стоящие после минимального.
Условие задачи: Ввести одномерный целочисленный массив А, вывести его. В массиве отсортировать по убыванию все элементы стоящие после...

Ввести целочисленный двумерный массив AN×N , вывести его. Определить K – сколько нечётных элементов содержится на диагоналях массива.
Ввести целочисленный двумерный массив AN×N , вывести его. Определить K – сколько нечётных элементов содержится на диагоналях массива. Далее...

Ввести целочисленный двумерный массив A(NxM), вывести его. Найти сумму положительных угловых элементов
Помогите пожалуйста с задачей: Ввести целочисленный двумерный массив A(NxM), вывести его. Найти сумму положительных угловых элементов....

1
охотник
 Аватар для vint-81
1011 / 535 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
19.12.2015, 13:48
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
const nn=10;
type mas=array[1..nn] of integer;
var a:mas;
    n,i,k:integer;
procedure inp(var x:mas);
var i:integer;
begin
 writeln('введите элементы массива:');
 for i:=1 to n do
  begin
   write('a[',i,'] = ');readln(a[i])
  end 
end;
procedure outp(x:mas;s:string);
var i:integer;
begin
 writeln(s);
 for i:=1 to n do write(a[i]:3);writeln
end;
procedure sdvig(var x:mas);
var i,tmp:integer;
begin
 tmp:=a[n];
 for i:=n downto 2 do a[i]:=a[i-1];
 a[1]:=tmp
end;
begin
 repeat
  write('введите количество элементов массива 1<n<=',nn,': ');
  readln(n)
 until (1<n)and(n<=nn);
 inp(a);
 outp(a,'исходный массив:');
 k:=0;
 for i:=1 to n do if odd(a[i]) then inc(k);
 writeln('количество нечетных: ',k);
 for i:=1 to k do sdvig(a);
 outp(a,'массив после циклического сдвига:');
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
19.12.2015, 13:48
Помогаю со студенческими работами здесь

Дан целочисленный одномерный массив. Определить количество его одинаковых элементов
Ребятушки,миленькие помогите) задача: дан целочисленный одномерный массив. определить количество его одинаковых элементов.(элементы ввести...

Ввести массив. Вывести его. Найти сумму элементов на четных позициях и произведение на нечетных позициях
Помогите пожалуйста решить. ввести массив. Вывести его. Найти сумму элементов на четных позициях и произведение на нечетных позициях.

Задать целочисленный массив. Вывести самый встречающийся элемент массива и его количество в массиве
Задать целочисленный массив. Вывести самый встречающийся элемент массива и его количество в массиве Помогите пожалуйста

Ввести одномерный массив из 7 целых чисел с клавиатуры и вывести его на экран. Найти его наименьший элемент
вывести одномерный массив из 7 целых чисел с клавиатуры и вывести его на экран. найти его наименьший элемент, заменить его на 0 и вывести...

Дан одномерный целочисленный массив из n элементов. Найти количество различных чисел среди элементов этого массива
Дан одномерный целочисленный массив из n элементов. Найти количество различных чисел среди элементов этого массива. Например, если задан...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru