Assignment #1 - 97B

Assignment #1 - 97B



Good Luck! This first assignment is for you to find
your way around the MUSIC mainframe timesharing system.

ONLY the FIRST assignment is to be sent to HUVN.


COMPUTERS IN ENGINEERING 308-208B
====================================

A S S I G N M E N T # 1 
                         Weight 10
                         DUE DATE : 21 Jan 1997
                         E-Mail to: HUVN


Write a Fortran program that prints your McGill Student
ID like this:

 9
  6
   1
    2
     3
      4
       5

(if your ID is 9612345 of course). It may seem stupid
for some of you but this assignment is really intended
to introduce you to MUSIC, the editor, control lines and technique
for developing programs. The control lines you should use are

/SYS REG=512

/LOAD VSFORT These lines all start in

/OPT SOURCE COLUMN 1

C

C Your Name:

C Your Code: HU__

C YOUR MCGILL ID: 96______

C THE COURSE NUMBER: 308-208B

C The Assignment Number: 1

C

      PRINT *,' '

      Your Program - starting in column 7

      END

/DATA

Once you have successfully run your program on the
screen, use the MUSIC RECORD feature to produce a printout 
if you need it.

Hit F3 a few times until a *GO prompt appears.

/PURGE @REC.000 << == Recommended

*GO

/RECORD

ASSIGN1 (If ASSIGN1 is the name of your program)

*GO

/RECORD OFF

*GO

/view @REC.000 << == Recommended to look at file

*GO

Once you have satisfied yourself that your program
runs correctly, you should E-Mail the @REC.000 file to 
HUVN for grading.

This is done by selecting the Mail item from the
CI menu or typing mail after the *GO prompt. For example:

*GO

MAIL

On the first panel select 2 for SEND MAIL. The following
screen will appear (see below) . READ IT CAREFULLY!!

We recommend that you copy the e-mail you are sending
to HUVN to yourself (HUxx).

See below an example:

---------------------------- Create and Send Mail----------------------

Command===>

Fill in the fields below and press ENTER to type
the mail text.

To=> HUVN

Subject=> Assignment 1

Text File=> @REC.000

Carbon=> HUxx

Copy=>