Возможный дубликат: Как преобразовать Ada.Real_TIme.Time в строку?
Как преобразовать тип времени, полученный с помощью Ada.Real_Time.Clock, в тип String в Ada?
чувак использует To_Duration, чтобы напечатать его (используя приведенный Duration'Image)