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

Найти элемент массива и выдать информацию о его расположении

29.06.2016, 17:34. Показов 1451. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Условие: В неупорядоченном наборе данных (элементах линейного массива) найти, используя процедуру поиска, элемент, имеющий значение -4, и выдать информацию о расположении данного элемента в массиве. Количество элементов массива равно 10.
Не могу понять как выдать расположение данного элемента.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
29.06.2016, 17:34
Ответы с готовыми решениями:

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

Найти наименьший элемент массива и его порядковый номер и вывести информацию об этом
ввести элемены массива х1, х2, ... , х6 с помощью Textbox. Найти наименьший элемент массива и его порядковый номер и вывести информацию...

Одномерный массив выдать на экран в виде матрицы и определить минимальный элемент массива и его координаты
Одномерный массив из k=72 элементов (элементы массива – случайные целые числа в интервале от z1=-20 до z2=80 ) выдать на экран в виде...

6
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
29.06.2016, 17:40
Цитата Сообщение от ManiKKK Посмотреть сообщение
как выдать расположение данного элемента.
Это его индекс. Например
Pascal
1
2
3
4
i:=1;
while a[i]<>-4 do i:=i+1;
if i>n then write('Нет такого элемента')
else write(i);
1
2 / 2 / 0
Регистрация: 29.06.2016
Сообщений: 179
29.06.2016, 18:07  [ТС]
А чем здесь является переменная n?
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
29.06.2016, 18:10
n это размер массива, у Вас n=10.
1
2 / 2 / 0
Регистрация: 29.06.2016
Сообщений: 179
29.06.2016, 18:26  [ТС]
У меня получился вот такой код
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var
mas:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do
mas[i]:=random(10)-10;
for i:=1 to 10 do
write(mas[i]+' ');
i:=1;
while mas[i]<>-4 do i:=i+1;
if i>10 then write('Нет такого элемента')
else write(i);
end.
Выдает ошибку мол "индекс находится вне границ массива", но не каждый раз. Примерно каждый третий запуск выдает такую ошибку.
0
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
29.06.2016, 18:34
Лучший ответ Сообщение было отмечено ManiKKK как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const n=10;
var mas:array[1..n] of integer;
   i:integer;
begin
randomize;
writeln('Массив');
for i:=1 to n do
 begin
  mas[i]:=-10+random(10);
  write(mas[i]:4);
 end;
writeln;
i:=1;
while (i<=n)and(mas[i]<>-4) do i:=i+1;
if i>n then write('Нет такого элемента')
else write(i);
end.
0
2 / 2 / 0
Регистрация: 29.06.2016
Сообщений: 179
29.06.2016, 18:36  [ТС]
То что нужно, спасибо!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
29.06.2016, 18:36
Помогаю со студенческими работами здесь

Найти сумму элементов массива и выдать на печать. Найти максимальный элемент в массиве и номер строки
Дан массив n*m. Найти сумму элементов массива и выдать на печать. Найти максимальный элемент в массиве и номер строки , в которой он...

По номеру отдела выдать информацию обо всех его сотрудниках
Всем, доброго времени суток. Ребята, пошел на заочку в институт и приплыл на лабе. Как делать не знаю, если кто-нибудь может помочь, я буду...

Найти сумму кратных трём отрицательных элементов массива. Найти минимальный элемент массива и его индекс
Друзья!!! Помогите написать текст программы в Паскале: № 3. Сформировать массив X(40) из случайных целых чисел на интервале . Массив...

Найти максимальный элемент массива, вывести его индекс. Найти среднее арифметическое элементов массива
Найти максимальный элемент массива, вывести его индекс. Найти среднее арифметическое элементов массива.

Заменить элемент массива на сумму его соседей, если элемент массива четный и номер его лежит в промежутке от a до b
Случайным образом генерируется массив чисел. Пользователь вводит числа a и b. Заменить элемент массива на сумму его соседей, если элемент...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru