Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Katia777
0 / 0 / 0
Регистрация: 03.05.2012
Сообщений: 60
1

Найти номера тех элементов массива, которые больше своего правого соседа, и количество таких элементов

10.02.2014, 00:48. Просмотров 900. Ответов 1
Метки нет (Все метки)

1. Дан массив размера N. Найти номера тех элемонтов массива, которые больше своего правого соседа, и количество таких элементов. Найденные номера вводить в порядке их возрастания.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.02.2014, 00:48
Ответы с готовыми решениями:

Найти номера тех элементов массива,которые больше своего правого соседа
Array30.Дан массив размера N.Найти номера тех элементов массива,которые больше...

Найти номера тех элементов массива, которые больше своего правого соседа
Помогите пожалуйста решить.позарес как надо!!! 1) Дан массив размера N....

Вывести те элементы в наборе, которые меньше своего правого соседа, и количество К таких элементов
№1. дан набор ненулевых целых чисел; признак его завершения - число 0. вывести...

Найти номера элементов массива, которые больше своего левого соседа
Всем доброго времени суток. Такая вот задача: Дан массив размера N. Найти...

Подсчитать количество тех элементов последовательности, которые больше своего левого соседа
С клавиатуры вводится последовательность целых чисел длиной N. Подсчитать...

1
Xo6ut
101 / 88 / 75
Регистрация: 04.11.2011
Сообщений: 1,775
10.02.2014, 03:05 2
Лучший ответ Сообщение было отмечено Katia777 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var
i:integer; 
coli:integer;
N:integer;
a: array [1..10] of integer;
begin
writeln('Введите N (N<=10))');
readln(N);
for i:=1 to n do begin write('a[',i,']=');readln(A[i]);end;
writeln('Результат');
col:=0; 
writeln('Номера');
for i:=1 to n-1 do
begin
if a[i]>a[i+1]then 
begin
writeln(i);
inc(col);
end;
end;
writeln('Количество ',col);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.02.2014, 03:05

Количество элементов массива, которые больше своего соседа слева
К сожалению, я совсем не умею работать в паскале. Может кто-то сможет мне...

Вывести те элементы, которые меньше своего левого соседа и количество таких элементов
1)дано целое число n&gt;1 и набор из н целых чисел.Вывести те элементы, которые...

Вывести номера тех чисел в наборе, которые меньше своего левого соседа
Дано целое число N и набор из N целых чисел. Вывести номера тех чисел в наборе,...


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

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

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