Перевести численный масштаб в именованый 1:500000

Дана
матрица А[1:5,1:5]. Ввести элементы массива с помощью генератора случайных
чисел в интервале [-10,15]. Вывести 
матрицу на экран

           

Найти:

1)произведение элементов
на главной диагонали, не равных нулю;

2)найти сумму
отрицательных элементов матрицы;