function PadZ(S: String; I: LongInt): String
Дополняет строку нулями слева до требуемой длины I.
Параметры: