Массивы!!!

[--Sashok--]

а понял....мне нада чтобы программа задавала числа рандомно, а я должен вводить числа с клавиатуры.Я спросил у препода.Так как сделать теперь без рандома.Ато все темы вродь знаю что учили.А дошли до массива и бле застрял.Плиз Хелп!

[baster128]

Дели каждый элемент массива в цикле при помощи mod, если на выходе 0, то четное число, если не 0 то нечетное.

if a[i] mod =0 then Writeln('Chetnoe') else Writeln('NeChetnoe');