Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.10.2015, 09:44   #1
voytik
Пользователь
 
Регистрация: 22.09.2015
Сообщений: 21
По умолчанию Массив

Пользователь вводит целочисленный массив А(а1..аn). Найти количество участков, на которых его элементы убывают.

(я посредник, эту задачу дали знакомому, я помогаю ему ее решить, но лично сам допереть не могу сути задачи... то есть представить как это... после каждой цифры, что меньше в массиве, в отдельную переменную счетчик +1 ставить или считать промежутки убывающие до первой цифры, что побольше будет предыдущей... в общем буду благодарен за любое решение...)
voytik вне форума Ответить с цитированием
Старый 04.10.2015, 10:14   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Если сам могешь сделать ввод массива то:
Код:
k:=0; cnt:=0;
i:=2; while i<=n do begin
 k:=i; while (i<=n)and(a[i]>a[i-1]) do inc(i);
 if (i-k)>1 then inc(cnt);
 inc(i);
end;
выводим cnt;
k,i,cnt - integer;
cnt - количество отрезков.
к - количество ступенек на отрезке.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Дан одномерный массив, сформировать новый массив по заданному правилу {Delphi} Nickolai47 Помощь студентам 5 16.12.2012 14:51
С# задан массив 5х5. сформировать массивы А и В. в массив А поместить элементы с четными индексами, в массив В с нечетны Koksa Помощь студентам 0 10.10.2011 11:26
Запись координат в массив в реал тайм, Как записать координаты в массив Dark19 Visual C++ 2 21.06.2011 18:45
Из массив А получить массив В, удвоив все нечётные элементы удвоены ( на Pascal) KARTER Помощь студентам 1 18.06.2011 19:58
Массив - Нужно написать массив и распечатать на экран с конца в начало(язык С++) econ Помощь студентам 1 29.05.2011 22:02