Stránka 1 z 1

program

Napsal: čtv 15. říj 2009, 21:01
od pato3335
Mohli by ste pomôcť?? prosím viem program ale enviem ako mám spraviť aby sa vygenerovali len jedno číslo nie rovnaké..zadanie....:
Vytvorte program, ktorý vygeneruje N navzájom rôznych celých čísel z intervalu
<a,b>. díky moc..... pascale ak sa dá

Re: program

Napsal: čtv 15. říj 2009, 21:32
od beardie
randomize;

a potom ked ti x vygeneruje, tak si podmienkou urci:
if x>a, pokracujes v generovani
if x<b, pokracujes v generovani
inak ho vypises

priebezne si davaj do premennej pocet vypisanych cisel, pocet = pocet + 1;

cele to das do cyklu repeat until pocet = N;

Re: program

Napsal: čtv 15. říj 2009, 21:44
od pato3335
Neviem či so to presne pochopil.....ale pracujem tam s poliami....takže interval a,b tam nemám použiť alebo ako to myslíš ty?

Re: program

Napsal: čtv 15. říj 2009, 21:49
od pato3335
Musím už ísť tak zajtar kebyže môžeš odpíš ešte lebo chcel by som radu v tom.....Díky

Re: program

Napsal: čtv 15. říj 2009, 21:58
od beardie
ked mi napises normalne zadanie, tak ti napisem normalny pseudokod :)

Re: program

Napsal: čtv 15. říj 2009, 22:02
od bubanek

Kód: Vybrat vše

const max=50;
var p:array[1..max] of integer;
i,a,b: integer;

begin
randomize;
read(a,b);
for i:=1 to max do p[i]:=random(b-a)+a;
end;
asi takhle nějak

Re: program

Napsal: pát 16. říj 2009, 17:06
od pato3335
díky ale to je asi zle preože napríklad...zadám interval 1,20 a dám náhodne 20 čísel a musí byž číísel od 1...20 samozjreme rzohádzane...každé číslo má byť iba raz!....? díky