Модераторы: Poseidon

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> [Delphi]Случайные числа, генератор с.ч. 
:(
    Опции темы
Cakypa
  Дата 9.3.2009, 19:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 28
Регистрация: 27.2.2008

Репутация: -4
Всего: -4



Требуется создать программу которая сгенирирует случайные четырехзначные числа: 1 разряд может быть только 0,1,2 то есть (число 1ХХХ, 0ХХХ, 2ХХХ)
Остальные разряды могут быть любыми то есть цифрами от 0 до 9, повторятся цифры могут, как видно всего 3000 чисел

Программа должно сгенерировать все эти числа и записать в таблицу, где первый столбец порядковый номер от 1 до 3000 (по порядку), а второй столбец само число:
примерно так:
1             2343
2             1234
3             0999
4             2678
5             0567

Таблицу желательно сделать в экселе
PM MAIL   Вверх
GoldFinch
Дата 9.3.2009, 20:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата



****


Профиль
Группа: Завсегдатай
Сообщений: 2141
Регистрация: 30.11.2008

Репутация: 1
Всего: 26



v[i]:=random(3000);

%)
PM MAIL ICQ   Вверх
zim22
Дата 9.3.2009, 20:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


depict1
****


Профиль
Группа: Завсегдатай
Сообщений: 2682
Регистрация: 15.1.2009
Где: Украина

Репутация: 16
Всего: 69



Цитата(GoldFinch @  9.3.2009,  20:02 Найти цитируемый пост)
v[i]:=random(3000);

не. первый разряд должен быть 0,1,2. остальные 3 разряда в диапазоне от 0 до 9.
а фунция random вернёт например число 12. хотя число должно быть 4 значным. т.е. 0012

первый вариант: можно определять количество значимых разрядов в числе и дописывать слева необходимое кол-во нулей, если число разрядов меньше 4.
второй вариант: можно вызывать 4 функции random для генерации каждого разряда цисла.
1 ф-я random в диапазоне 0-3
2-4 ф-я random в диапазоне 0-9


--------------------
PM MAIL   Вверх
Cakypa
Дата 9.3.2009, 22:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 28
Регистрация: 27.2.2008

Репутация: -4
Всего: -4



Я до этого додумалась, но не могу воплотить в жизнь(
PM MAIL   Вверх
zim22
Дата 9.3.2009, 22:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


depict1
****


Профиль
Группа: Завсегдатай
Сообщений: 2682
Регистрация: 15.1.2009
Где: Украина

Репутация: 16
Всего: 69



Cakypa, что конкретно у вас не получается? открыть Delphi?


--------------------
PM MAIL   Вверх
Cakypa
Дата 9.3.2009, 23:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 28
Регистрация: 27.2.2008

Репутация: -4
Всего: -4



конкретно, то что бы програма все .то занесла в таблцу
PM MAIL   Вверх
zim22
Дата 10.3.2009, 08:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


depict1
****


Профиль
Группа: Завсегдатай
Сообщений: 2682
Регистрация: 15.1.2009
Где: Украина

Репутация: 16
Всего: 69



приводите пример кода. посмотрю, где у вас ошибка.


--------------------
PM MAIL   Вверх
Cakypa
Дата 10.3.2009, 10:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 28
Регистрация: 27.2.2008

Репутация: -4
Всего: -4



Цитата

второй вариант: можно вызывать 4 функции random для генерации каждого разряда цисла.
1 ф-я random в диапазоне 0-3
2-4 ф-я random в диапазоне 0-9

при таком раскладе числа будут поворотятся.


Кто нить реально может такое сделать?
PM MAIL   Вверх
THandle
Дата 10.3.2009, 22:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Хранитель Клуба
Group Icon
Награды: 1



Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 30
Всего: 372



Cakypa, я понимаю. Спросить на форуме - одно. Но разводить людей на фрилансе - это уже не хорошо.

http://www.free-lance.ru/projects/?pid=184521
PM   Вверх
developer2007
Дата 10.3.2009, 23:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 112
Регистрация: 5.11.2007

Репутация: нет
Всего: -2



Ой как нехорошо, но я фишку сразу же просёк и не купился smile 
Полностью солидарен с THandle.

Добавлено через 1 минуту и 27 секунд
P.S. Было бы у меня 100 постов - точно бы сакуре в репу отрицалава напостил
--------------------
У настоящего програмёра прога пишется на асме с использованием натив апи 
PM MAIL   Вверх
Cakypa
Дата 11.3.2009, 10:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 28
Регистрация: 27.2.2008

Репутация: -4
Всего: -4



Реально нужен тот, кто сможет выполнять такие простые задание, уж лучше платить вам чем преподам! 
Тут быстрее найдешь хороших программистов чем на фрилансе, а мне все равно кому платить! zim22 думаю и ты бы согласился за деньги сделать
PM MAIL   Вверх
zim22
Дата 11.3.2009, 11:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


depict1
****


Профиль
Группа: Завсегдатай
Сообщений: 2682
Регистрация: 15.1.2009
Где: Украина

Репутация: 16
Всего: 69



Cakypa, я на С++ прогаю, не на Делфи.
я за деньги согласен на всё!  smile 


--------------------
PM MAIL   Вверх
Cakypa
Дата 11.3.2009, 12:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 28
Регистрация: 27.2.2008

Репутация: -4
Всего: -4



Вот вот, а если сообщения продублированны и на фриланс.ру то значит реально ищу себе помошника
PM MAIL   Вверх
developer2007
Дата 24.3.2009, 23:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 112
Регистрация: 5.11.2007

Репутация: нет
Всего: -2



zim22
ну как, денег дали? smile 
--------------------
У настоящего програмёра прога пишется на асме с использованием натив апи 
PM MAIL   Вверх
grigiv
Дата 25.3.2009, 17:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 32
Регистрация: 1.12.2008

Репутация: -3
Всего: -3



Здравствуйте!
Еще нужна помощь?
Помогу за вознаграждение.

Обращайтесь:
[email protected]
http://www.grigiv.h15.ru

P.S. Высылайте подробное задание и сообщите желаемый срок выполнения работы.

PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Центр помощи"

ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Несоблюдение правил может повлечь за собой самые строгие меры от закрытия/удаления темы до бана пользователя!


  • Название темы должно отражать её суть! (Не следует добавлять туда слова "помогите", "срочно" и т.п.)
  • При создании темы, первым делом в квадратных скобках укажите область, из которой исходит вопрос (язык, дисциплина, диплом). Пример: [C++].
  • В названии темы не нужно указывать происхождение задачи (например "школьная задача", "задача из учебника" и т.п.), не нужно указывать ее сложность ("простая задача", "легкий вопрос" и т.п.). Все это можно писать в тексте самой задачи.
  • Если Вы ошиблись при вводе названия темы, отправьте письмо любому из модераторов раздела (через личные сообщения или report).
  • Для подсветки кода пользуйтесь тегами [code][/code] (выделяйте код и нажимаете на кнопку "Код"). Не забывайте выбирать при этом соответствующий язык.
  • Помните: один топик - один вопрос!
  • В данном разделе запрещено поднимать темы, т.е. при отсутствии ответов на Ваш вопрос добавлять новые ответы к теме, тем самым поднимая тему на верх списка.
  • Если вы хотите, чтобы вашу проблему решили при помощи определенного алгоритма, то не забудьте описать его!
  • Если вопрос решён, то воспользуйтесь ссылкой "Пометить как решённый", которая находится под кнопками создания темы или специальным флажком при ответе.

Более подробно с правилами данного раздела Вы можете ознакомится в этой теме.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Центр помощи | Следующая тема »


 




[ Время генерации скрипта: 0.0840 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.