Generování náhodných čísel v poli a matici – Delphi – Fórum – Programujte.com

Ahoj, mohl by mě někdo napsat jednoduchý kód jak generovat náhodná čísla v poli a matici. Zkouším snad všecko ale vůbec mě to nejede. Díky

const MaxPrvku = 10;

const MaxCislo = 100;



var pole:array[1..MaxPrvku] of integer;

	i:integer;

begin

	randomize;



	for i:= 1 to MaxPrvku do 

	begin

		pole[i] := random(MaxCislo + 1); 	{melo by generovat 0 - maxcislo}	

	end;	

end;

To Joudicek:
To ti spadne, protože cyklus nemůže jít od 1 do MaxPrvku+1, ale pouze do MaxPrvku

To Honzc : Nezkousel jsem to, ale proc by to melo spadnout?Nejak nevidim duvod...

No protože pole má pouze počet prvků MaxPrvku a ty chceš v cyklu naplnit prvek, který už tam není tj. MaxPrvku+1
a teď jsem si ještě všiml, že pole se deklaruje jinak a to: var pole:array[1..MaxPrvku] of integer;

To Honzc : jo, je to tak... deklarace je chybne a v tom cyklu je teda taky chyba, opravim to....