Question

Срочно! На языке Паскаль! с клавиатуры вводится число N, за ним массив A из N элементов. Найдите номер первого по счёту элемента массива с нечётным значением.

Answer 1

Как то так...Будут вопросы, пиши ЛС,

Answer 2

Конечно, вот пример кода на языке Паскаль, который находит номер первого элемента массива с нечетным значением:

program FindOddElement;

var
  N, i: integer;
  A: array of integer;

begin
  // Вводим число N
  write('Введите число N: ');
  readln(N);

// Выделяем память под массив A
  SetLength(A, N);

// Вводим элементы массива A
  writeln('Введите элементы массива A:');
  for i := 0 to N - 1 do
  begin
    write('A[', i + 1, ']: ');
    readln(A[i]);
  end;

// Поиск первого элемента с нечетным значением
  i := 0;
  while (i < N) and (A[i] mod 2 = 0) do
    i := i + 1;

// Выводим результат
  if i < N then
    writeln('Номер первого по счету элемента массива с нечетным значением: ', i + 1)
  else
    writeln('В массиве нет элементов с нечетным значением.');
end.

Этот код сначала запрашивает у пользователя число N, затем создает массив A из N элементов. После этого пользователь вводит значения для каждого элемента массива. Затем код ищет первый элемент массива с нечетным значением и выводит его номер (индекс) или сообщение, если такого элемента нет.