RosettaCodeData/Task/A+B/Fortran/a+b-1.f
2023-07-01 13:44:08 -04:00

6 lines
116 B
Fortran

program a_plus_b
implicit none
integer :: a,b
read (*, *) a, b
write (*, '(i0)') a + b
end program a_plus_b