Помогите пожалуйста!

Нужно сгенерировать 5 чисел от 1 до 36 случайным образом, но так чтобы среди них не было одинаковых и сохранить их в массив, т е

Randomize;
for i:=1 to 5 do
r[i]:=Random(36)+1;

vlad13, читай здесь:
Randomize
, я приводил код который тебе нужен...