Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
rtif
0 / 0 / 0
Регистрация: 29.03.2012
Сообщений: 3
#1

Дан массив целых чисел. Определить количество нечетных отриц - Pascal ABC

30.03.2012, 16:50. Просмотров 514. Ответов 4
Метки нет (Все метки)

Дан массив целых чисел. Определить количество нечетных отрицательных элементов расположенных между первым максимальным и первым минимальным элементами.
Подскажите как решить?
Спасибо за ответ!!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.03.2012, 16:50
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Дан массив целых чисел. Определить количество нечетных отриц (Pascal ABC):

Дан массив целых чисел а1,…, а(энное). Подсчитать количество подряд идущих нечетных элементов - Pascal ABC
помогите пожалуйста. Добавлено через 5 часов 42 минуты Help!

Дан массив из 10 целых чисел определить количество элементов кратных 5 - Pascal ABC
Помогите пожалуйста составить программу! За ранее спасибо!!!

Дан массив целых чисел. Найти сумму положительных нечетных - Pascal ABC
Написать программу по процедурам с массивами в языке программирования Pascal. Задание: Дан массив целых чисел. Найти сумму...

Дан массив из целых чисел. Увеличить на 1 все элементы, кратные 3 и стоящие на нечетных местах - Pascal ABC
2)Дан массив из целых чисел. Увеличить на 1 все элементы, кратные 3 и стоящие на нечетных местах. Вывести полученный массив, упорядочить...

Дан двумерный массив. Определить количество нечетных элементов массива. - Pascal ABC
Дан двумерный массив. Определить количество нечетных элементов массива.

Дан целочисленный массив X(N,M).среди элементов нечетных столбцов массива найти количество четных чисел - Pascal ABC
Дан целочисленный массив X(N,M).среди элементов нечетных столбцов массива найти количество четных чисел.

4
Dani
1393 / 637 / 57
Регистрация: 11.08.2011
Сообщений: 2,291
Записей в блоге: 2
Завершенные тесты: 1
30.03.2012, 16:52 #2
Цитата Сообщение от rtif Посмотреть сообщение
Подскажите как решить?
находите позиции максимального и минимального элементов, а затем в цикле проверяете элементы на нечетность о отрицательность.
1
rtif
0 / 0 / 0
Регистрация: 29.03.2012
Сообщений: 3
30.03.2012, 17:49  [ТС] #3
Все равно не получается(((
Уффф, не могли бы вы написать программу, пожалуйста? и пояснить?
0
Dani
1393 / 637 / 57
Регистрация: 11.08.2011
Сообщений: 2,291
Записей в блоге: 2
Завершенные тесты: 1
30.03.2012, 17:58 #4
rtif, покажите хоть что получается
0
Севак
любитель покушать
681 / 632 / 106
Регистрация: 25.09.2011
Сообщений: 1,313
30.03.2012, 18:22 #5
rtif,
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
25
26
27
28
29
30
31
32
33
34
uses crt;
var a: array[1..10] of integer;
    i,max,min,imax,imin,x,y,k: integer;
begin
max:=-26;
min:=26;
write('Исходный массив: ');
for i:=1 to 10 do begin
a[i]:=random(51)-25;
write(a[i],' ');
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
end;
writeln;
for i:=1 to 10 do begin
if a[i]=max then break;
imax:=i+1;
end;
for i:=1 to 10 do begin
if a[i]=min then break;
imin:=i+1;
end;
 
if imax>imin then begin
x:=imin; y:=imax;
end;
if imax<imin then begin
x:=imax; y:=imin;
end;
for i:=x+1 to y-1 do begin
if (abs(a[i]) mod 2=1) and (a[i]<0) then inc(k);
end;
writeln('Кол-во искомых элементов, находящихся между ',x,'-ым и ',y,'-ым: ',k);
end.
1
30.03.2012, 18:22
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
30.03.2012, 18:22
Привет! Вот еще темы с ответами:

Дан двухмерный массив целых чисел. В каждой его строке найти количество четных элементов. - Pascal ABC
Дан двухмерный массив целых чисел. В каждой его строке найти количество четных элементов.

Дан двухмерный массив целых чисел. Определить среднее арифметическое всех элементов массива - Pascal ABC
22 Дан двухмерный массив целых чисел. Определить среднее арифметическое всех элементов массива

Дан квадратный массив целых чисел. Определить является ли он симметричным относительно своей побочной диагонал - Pascal ABC
Дан квадратный массив целых чисел. Определить является ли он симметричным относительно своей побочной диагонали.

Дан массив из n целых чисел. Определить наибольшую цифру каждого элемента массива, написав для этого - Pascal ABC
Дан массив из n целых чисел. Определить наибольшую цифру каждого элемента массива, написав для этого соответствующую подпрограмму


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

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

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