Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.04.2021, 21:41   #1
Narvik
Пользователь
 
Регистрация: 03.03.2021
Сообщений: 21
По умолчанию Второй нулевой элемент массива.

Здравствуйте. Как найти второй нулевой элемент массива?
Narvik вне форума Ответить с цитированием
Старый 06.04.2021, 21:47   #2
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,285
По умолчанию

Например, иметь переменные для индекса первого и второго нулевого элементов. В цикле пройтись по массиву, при встрече нуля запомнить индекс сначала первого, а затем второго. Когда записывается индекс второго элемента, то прервать цикл.
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
BDA вне форума Ответить с цитированием
Старый 06.04.2021, 21:59   #3
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,534
По умолчанию

Запросто. Он будет равен 0, если таковой в массиве окажется.
Надо задание правильно формулировать. "Найти индекс второго нулевого элемента массива".
Как-то так.
Код:
const N = 10 ;
var i,i0: integer;
mas: array [0..N] of integer ;
begin
   // тут заполнили массив
   i0 := -2 ;
    for i := 0 to N do
          if mas[i] = 0 then
             if i0 = -1 then 
                  begin
                     i0 := i ; Break
                   end
          else Inc(i0) ;
    if i0 >= 0 then Writeln ('Index = ', i0)
    else Writeln ('Net ni hrena!') ;
end.

Последний раз редактировалось digitalis; 06.04.2021 в 22:09.
digitalis вне форума Ответить с цитированием
Старый 07.04.2021, 07:07   #4
Narvik
Пользователь
 
Регистрация: 03.03.2021
Сообщений: 21
По умолчанию

Спасибо всем !
Narvik вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как найти второй по величине элемент массива? Wellshumor Помощь студентам 9 28.09.2018 00:33
Как найти второй максимальный элемент массива? ardamehr711 Помощь студентам 11 14.03.2018 19:39
[Си]: В каждом столбце двумерного массива поменять местами первый отрицательный элемент и последний нулевой. Помогите найти ошибку Yulia24* Помощь студентам 2 20.11.2016 01:21
Одномерный массив. Необходимо заменить последний положительный элемент на второй элемент массива кумитэ Паскаль, Turbo Pascal, PascalABC.NET 1 19.12.2011 16:44
первый нулевой элемент массива shelest Помощь студентам 2 15.11.2009 12:38