rnd

[Farkas Gábor]

Bocs, azt hittem mindig 1-20000 között kell.

Itt a javított:
http://sdrv.ms/15f95GA

FG

________________________________
Feladó: techinfo-bounces at lista.sulinet.hu [techinfo-bounces at lista.sulinet.hu] ; meghatalmazó: Ihász, Tibor [ihaszt at postafiok.hu]
Küldve: 2013. május 28. 13:39
To: techinfo at lista.sulinet.hu
Tárgy: Re: rnd

Köszönöm a válaszokat, és egyben pontosítom a kérdést:
Egy komlpex feladat részeként kellene excelben 2 cellában megadott
intervallumok között előállítani véletlenszerűen, egy harmadik cellában
megadott n db számot, és azokat kiíratni egymás alá egy oszlopban (n értéke max. 20000).
(Tehát pozitív egészekről van szó, nem kell "bolondbiztosnak" lenni vagyis kezdet kisebb mint vég, és v-k+1 >= n)
A faladat azzal van megtoldva, hogy nem lehetnek azonosak ezek a számok.
Valószínű VB-re lenne szükségem (de sajnos abban elég gyenge vagyok), de minden megoldás érdekel...
Vagyis a számhármast módosítva (és mondjuk egy OK gombot nyomva), változzon az adott oszlopba létrehozott számsor.

Talán még éthetőbb, ha nyomok FP megoldést (minden változó egész):
begin
readln(k);
readln(v);
readln(n);

db:=v-k+1;
for i:=1 to db do
  begin
   t[i]:=i+k-1;
  end;

randomize;
For i:=1 to n do
 begin
  a:=random(db)+1;
  seg:=t[a];
  t[a]:=t[db];
  t[db]:=seg;
  db:=db-1;
 end;

For i:=n downto 1 do
 writeln(t[i]);

Valami ilyesmit kéne tudni, "csak" excelben. ;-)

Köszönöm.

Ihász Tibor
--------- következő rész ---------
Egy csatolt HTML állomány át lett konvertálva...
URL: <http://lista.sulinet.hu/pipermail/techinfo/attachments/20130528/aa09f521/attachment.html>