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
	» Doczu 21:00 » Menah 20:59 » alkatraz 20:59 » Promilus 20:56 » Soulfly 20:49 » Holyboy 20:42 » Wedrowiec 20:31 » Ramen 20:25 » resmedia 20:18 » bajbusek 20:13 » Janusz 19:58 » wrrr 19:54 » PCCPU 19:43 » XepeR 19:42 » Venom79 19:41 » Hitman 19:32 » Irys 19:20 » Sherif 19:14 » Armitage 19:07 » emigrus 19:06 Dzisiaj przeczytano 52667 postów, wczoraj 25672 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