Program 1.Exercise10

PROGRAM Arithmetic
PROGRAM Arithmetic
!---------------------------------------------------------------------------------
!	John Doe					CPSC 141C					MonthName dd, yyyy
!
!										ASSIGNMENT #1
!	Program to add two real numbersm Variable used are ;
!		X, Y	: the two real numbers
!		Sum	: the sum of X and Y
!
!	Output 	: X, Y and Sum
!---------------------------------------------------------------------------------

IMPLICIT NONE

REAL :: X, Y, Sum

X = 1.234
Y = 5.5
Sum = X + Y

PRINT *, "Sum of", X, " and", y, " is", Sum
pause

End PROGRAM Arithmetic