Перевод из десятичной в двоичную на языке Паскаль