Вижу только верхнюю строчку в 2 сс=101000101 в 10сс =325
У прямоугольника квадрат наследует прямые углы. У ромба квадрат наследует равенство всех сторон.
По отношению к прямоугольнику квадрат обладает дополнительным свойством равенства смежных сторон. По отношению к ромбу квадрат обладает дополнительным свойством равенства всех углов; при этом все эти углы - прямые.
Т.е. дополнительные свойства потомка по отношению к одному из родителей - это свойства, унаследованные от остальных родителей.
Удалить всмысле на ноль заменить? если да, то:
if {name array}[2] <0 then
{name array}:=0;