ADD4.F95
PROGRAM ADD4 ! ! Purpose: A program to add two numbers and display numbers ! and their sum. ! IMPLICIT NONE DOUBLE PRECISION::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 ADD4