Помогите решить задачу по двумерному массиву в паскале

[Tolegg]

Из матрицы a(4,4) удалить столбец, содержащий все нули. Сформировать новую матрицу b(4,3) . Вывести ее на экран. В матрице b определить количество отрицательных элементов в нечетных строках.
матрица а:

-1,7 2,1 0 9,9
4,3 0,1 0 2,2
-5,8 2,9 0 4,7
-3,2 8,4 0 5,2

Объясните, пожалуйста, как удалить этот столбец из нулей...

[Namolem]

примерно так

цикл по столбцам:
	не_ноль? = 0
	цикл по строкам:
		если текущий элемент не равен нулю:
			не_ноль? = 1
			выйти из цикла по строкам
	если не_ноль? равен нулю, запомнить номер столбца (НС)
	
удаление нулевого столбца = пропуск его при создании новой матрицы

цикл по столбцам от 1 до НС-1:
	цикл по строкам:
		скопировать элемент A[i][j] в B[i][j]

РМ - размер матрицы
цикл по столбцам от НС+1 до РМ
	цикл по строкам:
		скопировать элемент A[i][j] в B[i][j-1]