| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
последовательность [D7, XP]
vigo_ © (2006-10-20 12:38:00)Добрый день, помогите с написанием функции
function PosNum(I: Integer): String;. Возвращаемое значение берется из последовательности "1" - X; "2" - Y; "3" - Z; 4 - "Y"; "5" - X; "6" - Z. Как быть с числами больше 6, т.е. по смыслу должно быть 7 - это значение из "1"; 8 - "2"; 9 - "3"; 10 - "4"; 11 - "5"; 12 - "6"; 13 - "1" и т.д.
Спасибо.
vigo_ (2006-10-20 13:03:00) [1]спасибо :-)
Правильный Вася (2006-10-20 12:43:00) [2]а для 0, -1, -2 ?
Думкин (2006-10-20 12:43:00) [3]а... в общем F1. В отпуск...
Думкин (2006-10-20 12:42:00) [4]и +1 не надо. :(
Думкин (2006-10-20 12:41:00) [5](a mod 6)+1+F1.
Думкин (2006-10-20 12:41:00) [6]7 конечно. :(
| |
