error

[Кубик-Рубик]

У меня вопросик, я новичок в delphi и пытаюсь понять некоторые вещи, но при создании одной проги, наткнулся на ошибку и не могу сообразить что "оно" от меня хочет) кто заметит отпишите пожалуйста)

var 
h: array [1..10] of integer;
begin
if
10 mod h = 0
then

label5.Caption:= '1000'

[Error] Unit1.pas(36): Operator not applicable to this operand type

курсор появляется на строке: "10 mod h = 0"

[Pein95]

10 mod h = 0
вот твоя ошыбка h без индекса ето ничто+ тебе нужно масив сначало заполнить

[Кубик-Рубик]

Пейн напиши пожалуйста как оно должно выглядеть)
а то я половины, не понял))))

[dekameron]

var 
h: array [1..10] of integer;
i:integer;
begin
for i:=1 to 10 do h[i]:=random(100);
if
10 mod h = 0
then

label5.Caption:= '1000';

[madmaniac]

после

begin

вставь или генератор случайных чисел масива или же сделай свой что бы заполнял масив...

Randomize //запуск генератора

про индекс сам не понял чутка

а вот терь понял )

[Pein95]

dekameron
у тя небольшая ошыбка)
вот в етом месте

10 mod h = 0

должно быть так:

10 mod h[i] = 0

[Pein95]

про индекс сам не понял чутка

нужно делить на елемент масива а не на его название

[madmaniac]

а понял теперь и я хоть и случайно заглянул
спасибо

[dekameron]

Сообщение от Pein95

dekameron
у тя небольшая ошыбка)
вот в етом месте

10 mod h = 0

должно быть так:

10 mod h[i] = 0

Ага, спасибо за поправку
Скопипастил, дописал заполнение массива, а о индексе забыл

[Кубик-Рубик]

h[i]:=random(100);

а это зачем?)