Простой алгоритм |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Простой алгоритм |
лёшик |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 14 Пол: Мужской Репутация: 0 |
Народ, прошу помощи, подскажите алгоритм для присваивания возрастающего значения числовой
переменной ( a:=a+1) и при достижении заданного значения aLim уменьшения значения до нуля (a:=a-1), чтобы в итоге текущее значение циклически колебалось в этих пределах. Цикл задан методом OnTimer. Заранее спасибо! Понимаю, что листинг такого алгоритма крайне несложен, но для чайника задачка пока что непосильная)))) |
лёшик |
Сообщение
#2
|
Новичок Группа: Пользователи Сообщений: 14 Пол: Мужской Репутация: 0 |
то есть, вводим логическую переменную napr (направление), которая будет переключать режим цикла между увеличением и уменьшением переменной "а"? Ок, пасибки, ща попробуем прописать))) А выражение if...then...else
допускает внутри себя повторение? If...then.....if.....else - ? Добавлено через 11 мин. a какие параметры у функций "inc" и "dec"? Не встречал их в учебниках |
sheka |
Сообщение
#3
|
Я. Группа: Пользователи Сообщений: 809 Пол: Мужской Реальное имя: Саша Репутация: 11 |
это тоже самое - просто поставил бегин-енд для наглядности.
Код if (napr=true)then begin if(a<alim)then inc(a) else napr:=false; end else begin if(a>0)then dec(a) else napr:=true; end; |
Текстовая версия | 28.09.2024 3:37 |