Помогите решить задачу!
Добавлено: 01 дек 2008, 22:38
Добрый день всем...Прошу мне помочь с задачей
Написать её надо на языке Pascal:
Дана матрица А [N,N ]. При распечатке N=5. А[i, j] = (-1) *I * j
1) Вывести матрицу.
2) Определить сумму элементов главной диагонали и произведение элементов выше главной диагонали.
3) Определить сумму элементов каждого столбца, вывести эти значения в строках
4) Записать на месте отрицательных элементов 0, на месте положительных 1 и вывести матрицу
Те кто решит буду очень признателен...Пожалуйста!
Написать её надо на языке Pascal:
Дана матрица А [N,N ]. При распечатке N=5. А[i, j] = (-1) *I * j
1) Вывести матрицу.
2) Определить сумму элементов главной диагонали и произведение элементов выше главной диагонали.
3) Определить сумму элементов каждого столбца, вывести эти значения в строках
4) Записать на месте отрицательных элементов 0, на месте положительных 1 и вывести матрицу
Те кто решит буду очень признателен...Пожалуйста!