PROGRAM Arithmetic
!--------------------------------------------------------------------------------------------------------------
!Dakota Gillette
!This program will add together two real numbers. Variables used are:
!	X, Y : the two real numbers
!	Sum  : the sum of X and Y
!
!Output: X, Y, Sum
!--------------------------------------------------------------------------------------------------------------
 
IMPLICIT NONE
REAL :: X, Y, Sum
 
X = 3.14
Y = 2.057
Sum = X + Y
WRITE (*,*) "Sum of", X, " and", Y, " is", Sum
 
END PROGRAM Arithmetic	

UFJPR1JBTSBBcml0aG1ldGljCiEtLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQohRGFrb3RhIEdpbGxldHRlCiFUaGlzIHByb2dyYW0gd2lsbCBhZGQgdG9nZXRoZXIgdHdvIHJlYWwgbnVtYmVycy4gVmFyaWFibGVzIHVzZWQgYXJlOgohCVgsIFkgOiB0aGUgdHdvIHJlYWwgbnVtYmVycwohCVN1bSAgOiB0aGUgc3VtIG9mIFggYW5kIFkKIQohT3V0cHV0OiBYLCBZLCBTdW0KIS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tCgpJTVBMSUNJVCBOT05FClJFQUwgOjogWCwgWSwgU3VtCgpYID0gMy4xNApZID0gMi4wNTcKU3VtID0gWCArIFkKV1JJVEUgKCosKikgIlN1bSBvZiIsIFgsICIgYW5kIiwgWSwgIiBpcyIsIFN1bQoKRU5EIFBST0dSQU0gQXJpdGhtZXRpYwk=