From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII
X-Google-Thread: 103376,233def024614b352
X-Google-Attributes: gid103376,public
From: randhol+nospam@pvv.org (Preben Randhol)
Subject: Re: A new hand's question
Date: 2000/05/07
Message-ID: <slrn8habe9.8mc.randhol+nospam@kiuk0156.chembio.ntnu.no>#1/1
X-Deja-AN: 620214799
Content-Transfer-Encoding: 8bit
References: <8f3992$ir1$1@netnews2.csie.nctu.edu.tw>
Content-Type: text/plain; charset=iso-8859-1
X-Complaints-To: usenet@itea.ntnu.no
X-Trace: kopp.stud.ntnu.no 957689275 14056 129.241.83.82 (7 May 2000 08:47:55
 GMT)
Organization: Norwegian university of science and technology
Mime-Version: 1.0
User-Agent: slrn/0.9.6.2 (Linux)
NNTP-Posting-Date: 7 May 2000 08:47:55 GMT
Newsgroups: comp.lang.ada
Date: 2000-05-07T08:47:55+00:00
List-Id: <comp.lang.ada>

On Sun, 7 May 2000 16:22:03 +0800, �����Y�۵M�I wrote:
>Hi,
>  How can I rewite the following code segment using a loop structure in Ada:
>
>  k := (j+13)/27
>loop:
>  if k>10 then goto out
>  k :=k+1
>  i := 3*k-1
>  goto loop
>out: ......

By reading: 

   http://adahome.com/Tutorials/Lovelace/s5s3.htm

For furter reading: 

   http://adahome.com/Tutorials/Lovelace/lovelace.html

I'd also like to recommend the book "Ada 95 Problem Solving and Program
Design" :

   http://www.seas.gwu.edu/~mfeldman/cs1book/

for a nice introduction to the Ada 95 language.

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