ADD3.F95
PROGRAM ADD3 ! ! Purpose: A program to add two integers and display the integers ! and their sum. ! IMPLICIT NONE REAL::X,Y,Z ! WRITE(*,*)'Enter the two numbers to be added' READ(*,*)X,Y Z=X+Y WRITE(*,*)'When ',X,' and ',Y,' are added the result is ',Z STOP END PROGRAM ADD3