[Lost_in_forest]

помогите пожылуйста всё в консоли на делфе
1.Создайте целочисленный массив А[1..15] с помощью генератора случайных чисел с элементами от –15 до 30 и выведите его на экран. Определите самый большой элемент массива и его индекс\
2.Найти произведение элементов линейного массива целых чисел, которые кратны 5. Размерность массива –10. Заполнение массива осуществить случайными числами от 10 до 100.
3. Дан целочисленный массив В[1..5, 1..5]. Найти сумму элементов его правой диагонали и произведение элементов левой диагонали.
4. Составьте программу, упорядочивающую по возрастанию элементы каждого столбца матрицы размером m*n

[lmikle]

За готовыми решениями в раздел "Работа". В противном случае - выкладывай свои наработки и спрашивай конкретно что не получается.

Посказки:
1. Цикл For, функция Random.
2. Цикл For, функции Random, mod (A[i] mod 5 = 0 дает True, если число кратно 5). Результирующую переменную перед циклом выставить в 1. Тогда можно спокойно умножать. Если после цикла она все еще = 1, то чисел, кратных 5 в массиве нет.
3. Главная диагональ B[I,I], вторая диагональ - B[1, N-I+1], где N - размерность массива.
4. Любой метод сортировки. Нужно 3 вложенных цикла For.