[bleeep]

Подскажите пожалуйста. Хочу использовать

Код:

1	a:=random(ListBox1.Items.Count/8);

Но здесь получается несоответствие типов (a:word , а ListBox1.Items.Count/8 имеет тип real)
Как можно организовать подругому данное присваивание?

Код:

1	a:=random(ListBox1.Items.Count/8)

Причем ListBox1.Items.Count делиться на 8 без остатка.

[dr. F.I.N.]

1)

Код:

1	a:=random(Round(ListBox1.Items.Count/8))

2)

Код:

1	a:=random(ListBox1.Items.Count div 8)

[bleeep]

Спасибо большое!))
Проблема решилась))