Re: Random function - PASCAL - Article 598 - go-pugleaf

Article View: comp.lang.pascal.borland

Article #598

Back to comp.lang.pascal.borland Previous Next

Re: Random function - PASCAL

#598

From: Jud McCranie
Date: Mon, 06 Dec 1999 00:00

9 lines
1139 bytes

Alexander Mueller <alexm@gmx.at> wrote:

>  repeat
>    Writeln(Students[Random(High(Students)+1)]);
>  until 1=2;

Something that is equivalent to the UNTIL condition is "until
false".
Jud McCranie

Technical Details

Message-ID: <kmko4ssvc7sr3k908b2dekf0v9lds0cfp4@4ax.com>

Path: arc1-ca.pugleaf.net!unknown!not-for-mail

References: <384c42e3.0@news1.mweb.co.za> <384C4D84.1F625BA7@gmx.at>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fd1d1,22f85d6fecf732ec
X-Google-Attributes: gidfd1d1,public
X-Google-Thread: 102601,22f85d6fecf732ec
X-Google-Attributes: gid102601,public
X-Google-Thread: 10261c,22f85d6fecf732ec
X-Google-Attributes: gid10261c,public
X-Google-Thread: 111659,22f85d6fecf732ec
X-Google-Attributes: gid111659,public
From: Jud McCranie <jud.mccranie@mindspring.com>
Subject: Re: Random function - PASCAL
Date: 1999/12/06
Message-ID: <kmko4ssvc7sr3k908b2dekf0v9lds0cfp4@4ax.com>
X-Deja-AN: 557485109
Content-Transfer-Encoding: 7bit
References: <384c42e3.0@news1.mweb.co.za> <384C4D84.1F625BA7@gmx.at>
Organization: MindSpring Enterprises
X-Server-Date: 7 Dec 1999 00:21:13 GMT
Content-Type: text/plain; charset=us-ascii
Mime-Version: 1.0
Reply-To: jud.mccranie@mindspring.com
Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.misc,ctdl.lang.pascal,de.comp.lang.pascal

Reply to Parent Message