Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!csd4.milw.wisc.edu!cs.utexas.edu!uunet!snjsn1!magic!grimesg
From: grimesg@magic (George Grimes)
Newsgroups: comp.lang.pascal
Subject: Re: Standard Pascal
Message-ID: <1153@snjsn1.SJ.ATE.SLB.COM>
Date: 14 Jul 89 13:08:42 GMT
References: <20239@adm.BRL.MIL>
Sender: news@SJ.ATE.SLB.COM
Reply-To: grimesg@magic.UUCP (George Grimes)
Organization: Schlumberger ATE, San Jose, CA
Lines: 50

In article <20239@adm.BRL.MIL> RDK%vm.temple.edu@cunyvm.cuny.edu (Robert Keiser) writes:
>ok, I've been watching the current disscusion about read/write vs. get/put
>and I have a question.  But first, let me tell you where I'm coming from.
>I've worked on a Cyber using U. of M. Pascal and on pc's using Turbo.  On
>the Cyber's, to get interactive I/O to work correctly required you to first
>declare the file input to be interactive (by placing a '/' after the filename
>on the program statement (i.e. PROGRAM HELLO (INPUT/,OUTPUT);).  The slash
>tells Pascal not to do the initial GET on input.  Then to read anything, you
>first would have to issue a blank readln followed by your read.  The code
>would look something like this:
>              .
Example deleted
>and I wanted to be realistic.  Anyway, the question, what would the same code
>look like in say VAX Pascal or MS Pascal?
More stuff deleted
>
>Robert Keiser

I tried the following in Vax Pascal:

program(input,output);

var
name	: varying[50];

begin
	write('What is your name? : ');
	readlne(name);
	writeln;
	writeln('The name you entered was: ',name)
end.


It compiled and ran without error.

George


-----------------------------------------------------------------------------
DOMAIN: grimesg@sj.ate.slb.com           | George Grimes
UUCP:   {decwrl,uunet}!sjsca4!grimesg    | Schlumberger Technologies
INTERNET: grimesg%sjs@sdr.slb.com        | 840 Avenue F #108
PHONE:  (214)422-7200                    | Plano, Tx. 75074
-----------------------------------------------------------------------------

Dis-claimer(as opposed to dat-claimer):
If my employers knew that I had an opinion, they probably wouldn't approve of
the opinion or the fact that I had it.

-----------------------------------------------------------------------------