|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.12.2012, 02:07 | #1 |
Регистрация: 06.12.2012
Сообщений: 3
|
Задача по одномерным массивам.(найти ошибку)
Всем доброго времени суток, уважаемые форумчане прошу вашей помощи в решении задачи.
Дан массив A(N), определить количество положительных элементов, стоящих после минимального значения элемента массива. Вот, что у меня получилось.Я никак не могу найти ошибку. Прошу вашей помощи. Код:
|
06.12.2012, 04:37 | #2 |
Пользователь
Регистрация: 17.08.2011
Сообщений: 35
|
1. У тебя в коде не заполняется массив, а N раз выполняет write('a[',i,']');
2. Из-за пункта 1 все выполняется не верно. Задача решается в 1 цикл Алгоритм: мин = 0 КолВо = 0 Цикл начинается заполняешь массив[I] Если мин <= массив[I] Тогда Если массив[I] > 0 Тогда КолВо + 1 конец условия иначе мин = массив[I] КолВо = 0 конец условия конец цикла |
06.12.2012, 08:25 | #3 |
Регистрация: 06.12.2012
Сообщений: 3
|
Все равно не получилось....
|
06.12.2012, 08:55 | #4 |
Старожил
Регистрация: 16.05.2012
Сообщений: 3,211
|
А чего получилось, показывай
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
|
06.12.2012, 09:42 | #5 |
Пользователь
Регистрация: 01.09.2012
Сообщений: 88
|
Код:
Программист - это не тот, кто пишет программы, а тот, чьи программы работают.
|
06.12.2012, 12:21 | #6 | |
Пользователь
Регистрация: 23.09.2012
Сообщений: 12
|
Заметил небольшую неточность:
если Ваш массив статичен, зачем задавать количество элементов? Если задать значение бОльшее 100 (в Вашем примере), то программа выйдет за границы. В таком случае, лучше воспользоваться функцией setlength. Цитата:
Последний раз редактировалось WillyWonka; 06.12.2012 в 12:23. |
|
06.12.2012, 13:52 | #7 | |
Регистрация: 06.12.2012
Сообщений: 3
|
Цитата:
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Программа по одномерным массивам | loldfox | Помощь студентам | 3 | 26.11.2010 09:28 |
Задача по одномерным массивам(паскаль) | pupik100 | Помощь студентам | 2 | 23.10.2009 16:32 |
Задача к одномерным массивам. | kry | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 29.12.2008 09:57 |