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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 19.11.2014, 18:29   #1
Yoja
 
Регистрация: 17.07.2010
Сообщений: 7
По умолчанию Циклы

Добрый день!
Помогите разобраться с такой штукой:
Имеем диапазоны
1-4
5-9
и т.д.
из этих диапазонов должны получится следующие результаты комбинаций
Берем диапазон от 1 до 4
1
2
3
4

результат:
1-2
1-3
1-4
2-3
2-4
3-4

следующий берем диапазон
от 5 до 9,
5
6
7
8
9
результат:
5-6
5-7
5-8
5-9
6-7
6-8
6-9
7-8
7-9
8-9

я что то совсем затупил. Помогите пожалуйста....
Yoja вне форума Ответить с цитированием
Старый 19.11.2014, 19:02   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Код:
var i,j:integer;
...
for i:=5 to 9 do begin
 for j:=i to 9 do writeln(i,'-',j);
end;
...
Не?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 19.11.2014, 20:00   #3
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,883
По умолчанию

Тогда уж
Код:
for j:=i + 1 to 9
phomm вне форума Ответить с цитированием
Старый 19.11.2014, 20:16   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

А-а-а... Ну да...
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 20.11.2014, 11:01   #5
Yoja
 
Регистрация: 17.07.2010
Сообщений: 7
По умолчанию

Спасибо огромное. Помогли ))
Yoja вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
синусы и ко. циклы, вроде циклы Scorch92 Паскаль, Turbo Pascal, PascalABC.NET 2 22.12.2010 19:26
Циклы - вложенны циклы? tigga Microsoft Office Excel 5 19.02.2010 23:36
циклы? serj-07 Помощь студентам 7 29.01.2010 00:25
Циклы Doublefaced Помощь студентам 2 01.07.2009 20:29
Циклы Evgo Помощь студентам 1 17.06.2009 10:30