Contents

I ANSI FORTRAN 77  :
 INTEGER A, B
 PRINT *, 'T    ub  b  c',
+         '   ENTER'
 READ *, A, B
 PRINT *, '   A + B = ', (A + B)
 PRINT *, '   A - B = ', (A - B)
 PRINT *, '   A * B = ', (A * B)
 PRINT *, '   A  B = ', (A  B)
 PRINT *, 'MOD(A,B) = ', MOD(A,B)
 PRINT *
 PRINT *, 'E u u   , ',
+         '   c   F, ...'
 PRINT *, '  A ** B = ', (A ** B)
 END

Version data entries

1 entries across 1 versions & 1 rubygems

Version	Path
zettacode-0.1.0	zettacode.files/arithmetic.integer/fortran.txt