Как в Delphi7 сделать генератор (не случайных) чисел?

-1

Мне нужно что бы программа генерировала числа в нужном мне порядке, например:
есть маска 0000-0000-0000-0000
нужно с генерировать по заданному диапазону, например:
с 0000-00000-0000-000 до 1111-22222-3333-444 и записать все это в файл в таком же виде:
0000-00000-0000-000
0000-00000-0000-001
0000-00000-0000-002
0000-00000-0000-003
0000-00000-0000-004
0000-00000-0000-005
и так далее.... до
1111-22222-3333-444
не повторяя и не пропуская числа заданного диапазона.
Буду очень признателен любой помощи!

Ответы:

BaluBig

Делаем 4 счетчика. Первый считает от 0 до 444. После достижения 444 он сбрасывается и инкрементируется второй счетчик, который считает от 0 до 3333. Аналогично два оставшихся. Как только последний счетчик досчитает до 1111 на следующем его инкременте цикл завершается.
Форматируем в строки с лидирующими нулями (см. SysUtils.Format) и пишем в файл.

Ant1973

А что Вы потом планируете делать с получившимся 600-терабайтным текстовым файлом?

BaluBig

Никакого файла не будет. Будет кому-то зачет :)))

11 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.