Q&A
- 랜덤함수에대해궁금합니다.
오늘 벌써 3개째 질문드리네요..
근데...답이 하나도 없어요 흑 T^T
랜덤함수
예를들어 random(100);
하면 0 에서 100까지의 난수가 발생하잖아요..
근데 상,하한값을 주고 싶거든요..
50 에서 100까지의 수만 골고루 나오게요..
a:=max //100
b:=min //50
주고
c:=random(a);
해서 c값이 b 이하이면 b:=min //50
주면 그럭저럭 되긴하는데..
난수 범위가 하한값에 치중하면
맨날 50만 나옵니다...
이 외에 다른 좋은방법은 없는지요..
꼭 답변 부탁 드립니다..
전 델5쓰고 있습니다.
근데...답이 하나도 없어요 흑 T^T
랜덤함수
예를들어 random(100);
하면 0 에서 100까지의 난수가 발생하잖아요..
근데 상,하한값을 주고 싶거든요..
50 에서 100까지의 수만 골고루 나오게요..
a:=max //100
b:=min //50
주고
c:=random(a);
해서 c값이 b 이하이면 b:=min //50
주면 그럭저럭 되긴하는데..
난수 범위가 하한값에 치중하면
맨날 50만 나옵니다...
이 외에 다른 좋은방법은 없는지요..
꼭 답변 부탁 드립니다..
전 델5쓰고 있습니다.
2
COMMENTS
-
-
i := Random(100);
while i < 50 do i := Random(100);
showmessage(IntToStr(i));
그럼 즐푸하세요..
(NOTICE) You must be logged in to comment on this post.
-
- 방은정
- •
- 2003.05.29 19:26
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2003.05.29 19:29안녕하세요. 최용일입니다. 레코드 선언하는 부분은 이상이 없네요... 뭔가 다른 부분에서 이상이 있는...
-
- 장성석
- 2003.05.29 16:52
- 0 COMMENTS
- /
- 0 LIKES
-
- 나그네
- •
- 2003.05.29 11:30
- 1 COMMENTS
- /
- 0 LIKES
-
yosule•2003.05.30 20:46^^
-
- 권광화
- •
- 2003.05.29 11:10
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2003.05.29 19:36안녕하세요. 최용일입니다. Read/ReadLn, Write/WriteLn등의 함수를 이용해보세요... WriteLn('숫자...
-
- 이정은
- •
- 2003.05.29 04:26
- 2 COMMENTS
- /
- 0 LIKES
-
KDDG_09•2003.05.29 22:58Query 콤포넌트로도 Insert, Edit, Delete, Post 등등 테이블 콤포넌트에서 했던것과 같이 사용할 수 있습...
-
major•2003.05.29 04:34그러면 이렇게 하는 건 어떨까요? update tablename set aaaa = :aaaa, bbbb = :bbbb, ...... ...
-
- 김정은
- •
- 2003.05.29 03:53
- 2 COMMENTS
- /
- 0 LIKES
오늘 벌써 3개째 질문드리네요.. 근데...답이 하나도 없어요 흑 T^T 랜덤함수 예를들어 random(100); 하면 0 에서 100까지의 난수가 발생하잖아요.. 근데 상,하한값을 주고 싶거든요.. 50 에서 100까지의 수만 골고루 나오게요.. a:=max /...-
한영관•2003.05.29 05:46a 와 b 사이의 난수를 발생하고자 한다면 예를 들어 b 가 상한선이라면.. ()에는...
-
이성훈•2003.05.29 05:02i := Random(100); &nb...
-
- 이상원
- •
- 2003.05.29 03:40
- 2 COMMENTS
- /
- 0 LIKES
-
박정일•2003.05.29 22:11괜찮은 사이트입니다. fa.delphikorea.com 그리고 시리얼통신 자체에 관한 책은 [serial port complete...
-
한만교•2003.05.29 07:32안녕하세요,,,통신에 대한 자세한 내용을 다룬 책은 없습니다.. 단지 해당 자동화 관련 사이트를 찾아보세...
-
- 정수지
- •
- 2003.05.29 03:35
- 2 COMMENTS
- /
- 0 LIKES
-
major•2003.05.29 04:27안녕하세요.. 위와 같이 하시려면 제 생각에는 그룹푸터를 사용하면 될 것 같은데요.. 그룹 헤더에...
-
정수지•2003.05.30 00:39메일을 보내려고 했는데...안가고 돌아오더라구여..^^;; 그래서 이렇게 다시 질문을 올립니다. 우선 님의...
-
- 최진술
- •
- 2003.05.29 02:59
- 4 COMMENTS
- /
- 0 LIKES
-
㉯㉰감자•2003.05.29 18:56해당 쿼리를 날리고 읽어오는 부분의 소스좀 보여주시죠... ADO에서 마이너스값이 있어도 정상적으로 불...
-
최진술•2003.05.29 19:31아래에 소스올립니다.. - ADO CONNECTION의 CONNECTIONSTRING부분의 세팅부분 Provider=SQLOLEDB.1;...
-
㉯㉰감자•2003.05.29 23:22제가 MS SQL Server가 없어 Access로 테스트 해봤는데요... 여전히 잘되거든요... 아마도 님의 테이...
-
최진술•2003.05.30 19:19DB에는 분명 선택 레코드의 필드값에 마이너스값이 존재합니다.. BDE로 연결하면 정상적으로 잘나오거든...
-
- 이철희
- 2003.05.29 01:49
- 0 COMMENTS
- /
- 0 LIKES
-
- 김정은
- •
- 2003.05.29 01:29
- 1 COMMENTS
- /
- 0 LIKES
-
이성훈•2003.05.29 05:06c:Program FilesComm FilesBolrand SharedImages.. 그럼 즐푸하세요
-
- 흐르는강물
- •
- 2003.05.29 01:21
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2003.05.29 20:30안녕하세요. 최용일입니다. 자료실에서 CRC라고 검색해보세요... ^^ 항상 즐코하세요...
-
- 이경민
- •
- 2003.05.29 01:17
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2003.05.29 20:14안녕하세요. 최용일입니다. 컴포넌트 소스를 수정하세요. Font속성을 만드셔서 쓰시던가 화면에 출력...
-
- 김경남
- •
- 2003.05.29 00:54
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2003.05.29 20:09안녕하세요. 최용일입니다. Destroy를 직접적으로 호출하시는 것은 별로 안좋은 방법입니다. 대신에 Fre...
-
- 조경모
- •
- 2003.05.29 00:27
- 2 COMMENTS
- /
- 0 LIKES
-
별볼일없는•2003.05.29 01:11options에 rowselect = False 하시면...
-
조경모•2003.05.29 02:32
-
- 약초꾼
- 2003.05.29 00:24
- 0 COMMENTS
- /
- 0 LIKES
-
- 남궁혁
- •
- 2003.05.28 23:27
- 4 COMMENTS
- /
- 0 LIKES
-
혜월•2003.05.29 01:31모달폼은 메인에서 처리하지 말고 모달폼을 부르는 dll에서 free하면 됩니다. 이때는 loadlibrary 밑에 ...
-
남궁혁•2003.05.29 01:46네.. 안그래도 혜월님께서 말씀해 주신 것처럼.. Child 폼에서 모달폼을 해제 시키는 방법으로 ...
-
㉯㉰감자•2003.05.30 00:33ShowMessage 하면 정상작동하고 빼면..안된다... 저도 이런 Case를 당해봤는데요... 이럴때 applicat...
-
남궁혁•2003.05.30 03:17어제 오후에 해결을 했는데... 말하기가 좀 남사시러워서리.. 쩝.. Child 폼에서 불러냈던 폼...
-
- 정수지
- •
- 2003.05.28 23:18
- 2 COMMENTS
- /
- 0 LIKES
-
정수지•2003.05.28 23:46해결봤습니다..^_______________________________^ 왜 자동으로 생성되지 않는가는 모르겠지만.... 우쨌...
-
㉯㉰감자•2003.05.29 01:49콤포넌트(TQuery)에서 더블클릭시 나오는 필드들은 콤포넌트내의 SQL프로퍼티에 집어 넣은 쿼리문을 돌려...
-
- 김정은
- 2003.05.28 23:00
- 0 COMMENTS
- /
- 0 LIKES
-
- 이정택
- •
- 2003.05.28 22:02
- 1 COMMENTS
- /
- 0 LIKES
-
nilriri™•2003.05.29 04:55샬롬~ 필드바이 네임을 쓰시려면 AddField해줘야 함니다.. Query1.fields.field[0].asString; 이건 ...
예를 들어 b 가 상한선이라면..
()에는 b - a + 1 이 들어가야합니다.
그러므로
Random(51) + 50 이렇게 선언하세요
예를 들면.. 다음과 같이
var
r, i : integer;
begin
Randomize;
for i := 1 to 50 do begin
R := Random(51) + 50;
ListBox1.Items.Add(IntToStr(r));
end;
도움이 되셨으면 합니다.....