Паскаль массивы 1 0