Как отсортировать ненулевые элементы в паскале? При условии что нулевые элементы должны остаться на своих местах

Когда берешь элемент, проверяешь, равен он нулю или нет. Если равен, идешь дальше, не трогаешь. Если не равен, то сравниваешь, меняешь, если надо.