HP 3000 Manuals

MPE V to MPE XL: Getting Started

Answers to Exercises 

1a. 

           :CALC 3+4 
           7,  $7,  %7

1b. 

           :CALC 3=3
           TRUE

1c. 

           :CALC 'abcdefg' - 'abc'
           defg

2a. 

           :SETVAR NAME, "John"
           :SETVAR LASTNAME, "Doe"

2b. 

           :SETVAR C,NAME+" "+LASTNAME
           :ECHO !C
           John Doe

3. 

           :CALC NAME+" "+LASTNAME
           John Doe

4. 

           :CALC name=lastname
           FALSE

5. 

           IF (hpday mod 2)=0 THEN
            ECHO Do this.
           ELSE
            ECHO Do that.
           ENDIF

6. 

           SETVAR counter, 1
           WHILE counter<11
            ECHO !counter
            SETVAR counter,counter +1
           ENDWHILE

7. 

           SETVAR counter, 2
           WHILE counter<51
            ECHO !counter
            SETVAR counter,counter+2
           ENDWHILE

           or, using the SETVAR ( ) function:

           SETVAR counter,0
           WHILE SETVAR (counter,counter+2)<=50 DO
             ECHO !counter
           ENDWHILE

8. 

           SETVAR a, 3+2
           SHOWVAR a
           A = 5

           CALC 3+2
           5, $5, %5

           ECHO 3 + 2 = ![3+2]
           5

9. 

           SETVAR X, 24
           SETVAR Y, 362
           SETVAR Z, 1000
           ECHO ![(X + Y + Z - 252) * 4]
           4536

10. 

           INPUT YEAR,"What is your favorite year? "
           SETVAR YEAR,!YEAR
           ECHO Had you been born in the year !year,
           ECHO you would be ![2010-year] years old
           ECHO in the year 2010!

MPE/iX 5.0 Documentation