Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.04.03;
Скачать: [xml.tar.bz2];

Вниз

Генерация   Найти похожие ветки 

 
GIMLI   (2003-03-14 20:10) [0]

Срочно помогите. Нужно сгенерировать число, но я ламер и не знаю, как это сделать. Помогите, кто может. Тут кто-то писал уже, но никто не отвечал, вот я решил сам написать.


 
jack128   (2003-03-14 20:36) [1]

var i : integer;
begin
i := 0;
end;


 
GIMLI   (2003-03-14 21:03) [2]

Ага. И все чтоли? Тогда надо переходить на QBASIC...


 
Sha   (2003-03-14 21:10) [3]

14


 
Delphi5.01   (2003-03-14 21:48) [4]

esli ia ponal vopros to eto voobshe azi i:=Random(100); generacia chisla iz intervala 0..99.

p.s. vo vsex knigax po delfi ili paskale est! :-(


 
Alex Konshin   (2003-03-15 03:41) [5]

Не правильно.
17.


 
Lerroy   (2003-03-15 18:47) [6]

2Delphi5.01 ©
Это действительно азы.
Небольшое уточнение, если я не ошибаюсь - если генерация чисел
идет например в цикле, то нужно перед ней
использовать процедуру randomize; Иначе будет генериться
одно и то же число.


 
Юрий Зотов   (2003-03-15 18:53) [7]

> Lerroy © (15.03.03 18:47)
> если я не ошибаюсь

Ошибаетесь. Будет генериться не одно и то же число, а одна и таже последовательность разных чисел.


 
squab   (2003-03-16 18:53) [8]

короче надо использовать:
var i:integer;
begin
randomize();
i:=random(100);
end;



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2003.04.03;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.008 c
14-6769
Юров Владимир
2003-03-17 16:26
2003.04.03
SynEdit vs. Delphi 6


6-6633
MikeFW
2003-02-10 14:49
2003.04.03
Как организовать мгновенную рассылку писем по e-mail?


3-6330
Igor Kashtanov
2003-03-09 00:51
2003.04.03
Быстрый поиск в DBLookupComboBox


3-6359
Ask
2003-03-14 11:40
2003.04.03
TDBGrid


14-6687
NetBreaker666
2003-03-18 19:11
2003.04.03
Кстати, нафига нужны компоненты IntraWeb.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский