[dimanche13]

переводишь число в строку и вперед!

Local a:Int = 12345

Local s:String

s = String(a)

Print Chr(s[0])
Print Chr(s[1])
Print Chr(s[2])
Print Chr(s[3])
Print Chr(s[4])