Random() - Общие вопросы Delphi

Alest · 12.06.2010, 00:27

Нужно через Random() получить 16ти значное число, подскажите как это можно сделать?

Alex Cones · 12.06.2010, 00:33

Код:

Var
S: String;
I:Integer;
Begin
For I:=1 to 16 do
Begin
 If I=1 Then S:=IntToStr(Random(9)+1) Else
 S:=S+IntToStr(Random(10));
End;

Alest · 12.06.2010, 00:42

Благодарю!

12.06.2010, 00:27	#1
Alest Пользователь Регистрация: 07.06.2010 Сообщений: 28	Random() Нужно через Random() получить 16ти значное число, подскажите как это можно сделать?

12.06.2010, 00:33	#2
Alex Cones Trust no one. Старожил Регистрация: 07.04.2009 Сообщений: 6,526	Код: `Var S: String; I:Integer; Begin For I:=1 to 16 do Begin If I=1 Then S:=IntToStr(Random(9)+1) Else S:=S+IntToStr(Random(10)); End;` SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА. МОЙ БЛОГ GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
random в С++	Swool	Общие вопросы C/C++	21	18.02.2012 21:55
random	Flippp	Общие вопросы C/C++	11	10.07.2009 21:10
Random	W_P	Паскаль, Turbo Pascal, PascalABC.NET	2	08.10.2008 00:05
Random	Febreze	Общие вопросы Delphi	2	28.04.2008 14:17

12.06.2010, 00:42	#3
Alest Пользователь Регистрация: 07.06.2010 Сообщений: 28	Благодарю!