[vovan1993]

1) array [1..10,1..10] of integer;
2)Random'мом;
3)for i:=1 to 10 do
j:=1 to 10 do begin

я написал эту прогу)