Example 2.5

FORTRAN Version

!
      PROGRAM P25
!
!
!     CONVERSIONS IN EXPRESSIONS
!
      IMPLICIT NONE
      INTEGER :: I
      REAL :: A
!
      PRINT *, 'This is Program >> P25  - Mixed Operations'
!
!
!     MIXED OPERATIONS
!
      A = 1.5
      I = 2
      PRINT *,' A+I = ',A+I
      PRINT *,' A-I = ',A-I
      PRINT *,' A*I = ',A*I
      PRINT *,' A/I = ',A/I
!
      STOP
      END PROGRAM P25

              +--------------------------------------------------+
              |     32-bit Power for Lahey Computer Systems      |
              |   Phar Lap's 386|DOS-Extender(tm) Version 7.0    |
              |  Copyright (C) 1986-94 Phar Lap Software, Inc.   |
              |           Available Memory = 14880 Kb            |
              +--------------------------------------------------+


This is Program >> P25  - Mixed Operations
 A+I =     3.50000    
 A-I =   -0.500000    
 A*I =     3.00000    
 A/I =    0.750000    

Pascal Version

{
     Conversions in expressions
}
PROGRAM p25 (input, output);
VAR
  i : INTEGER;
  a : REAL;
{
     Mixed operations
}
BEGIN
  a := 1.5;
  i := 2;
  writeln (' a+i = ', a+i);
  writeln (' a-i = ', a-i);
  writeln (' a*i = ', a*i);
  writeln (' a/i = ', a/i)
END.

Last modified: 21/07/97