Всего 1 задача, помогите люди добрые !

[Cakypa]

Привет всем добрым и отзывчивым людям !
Помогите справиться с такой задачей, учусь на ЭиУ поэтому впрграмировании 0
Надо в Delphi намписать такую программу :

Дана матрица Y(N,N). Вычислить значение произведения отрицательных элементов, расположенных выше главной диагонали матрицы.

Преподы только сказали что матрицу надо заполнять прям в программе или она делаеться сама как-то ! И затем щелкая по кнопке расчет у нас выдавался результат
Пожалуйста помогите ! Надежда только на вас !

 

[AlexZir]

Cakypa
Опишите задание более точно. Какие именно компоненты вы проходили? Изучали ли вы StringGrid? Какие именно обработчики событий вам известны?

Мой вариант решения:
На форму помещаете TStringGrid, TEdit и TButton. В разделе переменных определяете переменные для счетчика цикла и для суммы, в обработчике ButtonClick прописываете заполнение TStringGrid с помощью генератора псевдослучайных чисел, затем в цикле считываете нужные значения, сравниваете их с нулем и отрицательные прибавляете к сумме. После завершения цикла значение суммы присваиваете свойству Text компоненты TEdit.