Ada function

Ada function

[version_x]

i'm writing a program for a uni assignment and needed a bit of help,

basically the program asks the user to chose from a chioce of three options, all of which have a different $ value and then asks you how many you want and then computes the final value.
(i realise this is simple)

my question is, instead of using if statements, which would appear to be a fairly longwinded way is there an ada equivalent  the "case" statement that appears in other programming languages?


rees.

Re: Ada function

[Preben Randhol]

On Sat, 11 Mar 2000 18:07:04 +0800, version_x@hotmail.com
<version_x@hotmail.com> wrote:

>my question is, instead of using if statements, which would appear to
>be a fairly longwinded way is there an ada equivalent  the "case"
>statement that appears in other programming languages?

Check if this is what you are after:

<URL: http://www.adapower.com/rm95/arm95_101.html#SEC101 >


Ada95 Reference Manual :

<URL: http://www.adapower.com/rm95/arm95_toc.html >

-- 
Preben Randhol -- [randhol@pvv.org] -- [http://www.pvv.org/~randhol/]
         "Det eneste trygge stedet i verden er inne i en fortelling."
                                                      -- Athol Fugard

Re: Ada function

[tmoran]

>is there an ada equivalent the "case" statement that
>appears in other programming languages?
  Yes.
 case day is
   when friday => party;
   when saturday | sunday => rest;
   when others => RTFM;
 end case;

Re: Ada function

[HDhil]

Rees,

There is a case statement in Ada. It
takes the form

CASE <case expression> IS
        WHEN <choice1> => <statements>
        WHEN <choice2> => <statements>
               .
               .
        WHEN <choiceN> => <statements>
END CASE;

Note that <case expression> must be a discrete type, yielding an integer,
Boolean, character or user-defined enum type.

Also, every possible case value of the <case expression> must be covered in one
and only one WHEN clause. You can use
WHEN OTHERS as a final choice at the end of the CASE statement to cover
remaining values.

Hope this helps.

-Harry