Prosta sprawa dla znawców Pascala

	B O A R D
	» Board » Zadaj pytanie » Archiwum » Szukaj » Stylizacja

M E N U

» Nowości

» Archiwum

» Recenzje / Testy

» Board

» Rejestracja

Szukaj @ TwojePC

	OBECNI NA TPC
	» kojot 10:02 » Doczu 09:59 » rrafaell 09:59 » MARtiuS 09:52 » Markizy 09:48 » @GUTEK@ 09:48 » ligand17 09:44 » Robek 09:41 » ARTi 09:40 » Sherif 09:32 » Sociu 09:28 » jablo 09:27 » wrrr 09:11 » ProSavage 09:06 » maddog 09:01 » KHot 08:59 » Syzyf 08:59 » b0b3r 08:52 » rooter666 08:51 » XepeR 08:49 Dzisiaj przeczytano 41121 postów, wczoraj 25974 Szybkie ładowanie jest: włączone.

ccc

A R C H I W A L N A W I A D O M O Ś Ć

Prosta sprawa dla znawców Pascala , helmut 8/09/01 11:20
Potrzebuje wygenerować troche losowych liczb .Oczywiście :

for i:=1 to 10 do
liczba:= random(i tu mam problem).

Jeśli wpiszę w nawias np.100 to wygeneruje mi liczby z zakresu od 0 do 100 , a ja chce od 100 do 200;

Próbowałem to załatwić tak:

for i:=1 to 10 do
begin
liczba:=random(200)
repeat
if liczba<100 then liczba:=random(200)
until liczba >100
end;

jest to dosyć karkołomne...
Jest sposób żeby po prostu wpisać zakres od 100-200?

Ctrl - Alt - helmut - delete

Zakres zostaw jak jest, , Umek 8/09/01 11:31
a jedynie wynik przesuń do potrzebnego ci zakresu. Czyli:
random(0,n)+x->zakres od x do x+n
liczba:=random(100) + 100; , Menah 8/09/01 11:36
albo cos podobnego
W sumie to ja nie wierzę w ten internet
1. ooo! , helmut 8/09/01 11:46
  najciemniej pod latarnią. dzięki - oczywiście aby uzyskać liczbe 200 to musze zapodać random(101) bo najwiąkszą liczbą tego przedziału jest 100 (100 +100 = 200 :)-eureka!)
  Ctrl - Alt - helmut - delete