A+B: Difference between revisions

Content added Content deleted
(Added Fortran)
Line 142: Line 142:
4
4
</pre>
</pre>
=={{header|Fortran}}==
<lang fortran>program a_plus_b


implicit none
integer :: a
integer :: b
integer :: iostat

do
read (*, *, iostat = iostat) a, b
if (iostat /= 0) exit
write (*, '(i0)') a + b
end do

end program a_plus_b</lang>
=={{header|Haskell}}==
=={{header|Haskell}}==
<lang haskell>sum' :: [Char] -> Int
<lang haskell>sum' :: [Char] -> Int