Question

Найти номер и значение первого положительного элемента массива.

Answer 1

===== PascalABC.NET =====

begin

 var n := ReadInteger('n =');

 var a := ArrRandom(n, -99, 99);

 a.Println;

 var i := a.FindIndex(p -> p > 0);

 if i > -1 then

   Println('Элемент с номером', i + 1, 'имеет значение', a[i])

 else

   Println('Нет положительных элементов')

end.

Answer 2

Для нахождения номера и значения первого положительного элемента в массиве, вы можете использовать цикл, чтобы пройти по всем элементам массива, и как только вы найдете положительный элемент, сохранить его значение и номер. Вот пример на псевдокоде:

plaintextCopy code
1. Инициализировать переменные:
   - номер_первого_положительного = -1
   - значение_первого_положительного = -1

2. Пройти по всем элементам массива:
   Для каждого элемента массива с индексом i:
      Если элемент[i] > 0:
         - номер_первого_положительного = i
         - значение_первого_положительного = элемент[i]
         Прервать цикл (чтобы найти только первый положительный элемент)

3. Вывести номер_первого_положительного и значение_первого_положительного.

Здесь элемент представляет собой ваш массив. Номер элемента будет индексом i, а значение элемента будет элемент[i].

Обратите внимание, что в зависимости от языка программирования, который вы используете, синтаксис может немного отличаться, но общий принцип останется таким же.