Re: integers into strings

[Simon Wright <simon@pushface.org>]

"isaac2004" <isaac_2004@yahoo.com> writes:

> no im not converting the inputted number into a string im sorting
> the digits of the value into ascending and descending order and then
> making two different numbers out of it one ascending one descending

The input is a string.

A string is an array of characters, so if you can sort an array you
can sort a string. I don't know what the point of this exercise is for
you but some hints on how you might use attributes to help make a
function that sorts a string of arbitrary length are in this ..

   with Ada.Text_IO; use Ada.Text_IO;

   procedure Isaac is
      Input : constant String := "1234";
      Output : String (1 .. Input'Length);
   begin
      for I in Input'Range loop
         Output (Output'Last - (I - Input'First)) := Input (I);
      end loop;
      Put_Line (Output);
   end Isaac;

Once you have a string, you can convert it to an integer using
Integer'Value:

   Result : constant Integer := Integer'Value (Output);