Помогите решить задачу!

Добрый день всем...Прошу мне помочь с задачей
Написать её надо на языке Pascal:

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

Те кто решит буду очень признателен...Пожалуйста!

1) Задание, я так понимаю, дали в учебном заведении
2) Задание элементарное - программа клепается минут за 10-15
3) Если с таким заданием требуется помощь, значит знания предмета абсолютно нулевые и сдать преподавателю такую программу ну никак не получится.
Вот наверное довольно неплохой курс по паскалю:
http://www.intuit.ru/department/pl/plpascal/

Если почитать хотя бы пару часиков, то задача будет успешно решена. Удачи.