0 / 0 / 0
Регистрация: 27.12.2011
Сообщений: 25
1

Найти номер первого четного числа в массиве

27.12.2011, 01:30. Показов 1383. Ответов 2
Метки нет (Все метки)

В одномерном массиве целых чисел a1, а2, ..., an найти но¬мер первого четного числа. Если четных чисел нет, то отве¬том может быть число 0. ПЛИЗ РЕШИТЕ
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.12.2011, 01:30
Ответы с готовыми решениями:

В одномерном массиве найти номер первого четного числа
В одномерном массиве целых чисел a1, а2, ..., an найти но¬мер первого четного числа. Если четных...

Найти номер первого четного числа последовательности чисел
решить задачу двумя способами 1. С массивом(При решении способом с массивом вывести все введенные...

Найдите номер первого четного числа последовательности чисел
Здесь нужен цикл с четчиком С клавиатуры вводиться n заданных чисел a1, a2, a3,..... an .Найдите...

Найдите номер первого четного числа последовательности чисел
Сказано что задача решаеться через цикл с четчиком. С клавиатуры вводиться n заданных чисел a1,...

2
17 / 16 / 11
Регистрация: 23.12.2011
Сообщений: 89
27.12.2011, 01:37 2
Лучший ответ Сообщение было отмечено Игорь26 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Program by_goodvin1709;
var
a:array[1..20] of Integer;
i,j:Integer;
begin
For i:=1 to 20 do
a[i]:=Random(100);
 
For j:=1 to 20 do
begin
if a[j] mod 2 = 0 then 
begin
Writeln('Превое четное число в масиве:№',j,' Ето число: ',a[j]);
j:=20;
end;
end;
end.
1
trainspotting
1086 / 486 / 384
Регистрация: 11.11.2010
Сообщений: 773
27.12.2011, 11:09 3
полное решение
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
const
  n=15;
type
  arr=array[1..n] of integer;
var
  a:arr;
  i,ip:integer;
begin
  randomize;
  for i:=1 to n do
    begin
      a[i]:=random(50);
      write(a[i]:4);
    end;
  writeln;
  i:=1;
  while (i<=n) and (a[i] mod 2<>0) do
    i:=i+1;
  if i>n then
    ip:=0
  else
    ip:=i;
  writeln('Indeks pervogo chetnogo elementa:',ip);
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.12.2011, 11:09

Найти номер первого четного элемента массива
Пожалуйста, помогите решить!!!

Найти номер максимального четного элемента в массиве
Имеется массив А из N произвольных чисел - А(N), среди которых есть положительные, отрицательные и...

Массив. Увеличить все четные числа на исходное значение первого четного числа
помогите, пожалуйста, решить задачу. дан целочисленный массив размера N. увеличить все четные числа...

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


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.