Дана произвольная квадратная матрица (вводится с клавиатуры), посчитать сумму элементов находящихся на главной диагонали. нужна программа написанная на паскале!

Дана произвольная квадратная матрица (вводится с клавиатуры), посчитать сумму элементов находящихся на главной диагонали. нужна программа написанная на паскале!