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
	» piwo1 13:57 » Robek 13:56 » alkatraz 13:56 » adolphik 13:50 » Hitman 13:47 » Sherif 13:46 » NimnuL 13:40 » ligand17 13:36 » XepeR 13:35 » elliot_pl 13:32 » Chrisu 13:32 » LooKAS 13:29 » Dhoine 13:26 » Holyboy 13:23 » Guli 13:23 » NWN 13:20 » Kenny 13:14 » siwydym 13:13 » mravel 13:04 » Visar 13:01 Dzisiaj przeczytano 36865 postów, wczoraj 25433 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